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ABSTRACT 

This  thesis  develops  a  Lanchester-type  force-on- force  combat  model 
simulating  small -unit  amphibious  operations.  The  model  commences  with 
a  ship-to-shore  assault  of  aggressor  forces  mounted  onooard  Landing 
Vehicle  Assault  craft  moving  against  a  defensive  force  ashore.  Once 
the  ship-to-shore  phase  of  combat  is  completed,  the  model  continues 
to  simulate  land  combat  further  inland  between  the  assaulting  aggressor 
forces  and  other  defensive  forces  occupying  key  terrain. 

The  main  thrust  of  the  thesis  is  to  alleviate  some  of  the  problems 
associated  with  the  inherent  abstractness  of  Lanchester-type  combat 
models;  specifically,  to  develop  "user-friendly"  input-data  and  output 
structure,  and  more  thorough  documentation  of  the  model's  a'gorithms 
to  provide  a  model  which  would  be  more  easily  understood  ami  utilized 
by  students  of  combat  modeling. 
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I .      INTRODUCTION 

A.  OVERVIEW 

This  thesis  develops  a  Lanchester-type  force-on-force  combat  model 
simulating  small -unit  amphibious  operations.  The  model  commences  with 
a  ship-to-shore  assault  of  aggressor  forces  (e.g.,  a  U.S.  Marine  Infantry 
Battalion),  mounted  onboard  Landing  Vehicle  Assault  craft  (LVA)  moving 
against  a  defensive  force  ashore  located  in  fixed  positions  along  the 
coast  the  aggressor  force  is  attempting  to  occupy.  Once  the  ship-to- 
shore  phase  of  combat  is  completed,  the  model  continues  to  simulate 
land  combat  further  inland  between  the  assaulting  aggressor  forces  and 
other  defensive  forces  occupying  key  terrain. 

The  main  thrust  of  the  thesis  is  to  alleviate  some  of  the  problems 
associated  with  the  inherent  abstractness  of  Lanchester-type  combat 
models  (see  [Ref.  1]),  and  specifically  to  integrate  and  enhance  work 
done  in  previous  models,  to  develop  "user-friendly"  enhancements,  and 
more  thorough  documentation  of  algorithms  to  provide  a  model  which  would 
be  more  easily  understood  and  utilized  by  students  of  combat  modeling. 

B.  BACKGROUND  AND  GENERAL  MODEL 
1 .  Overview 

The  small -unit  "amphibious  operation  combat  model  presented  in 
this  thesis  is  the  result  of  the  integration  and  enhancement  of  two 
independent  combat  models.  The  first  model  is  a  ship-to-shore  combat 
model  which  models  a  ship-to-shore  assault  conducted  by  landing  vehicle 
assault  craft  against  fixed  enemy  positions  ashore.  The  second  model 


is  a  land  combat  model  which  models  a  land  assault  conducted  by   LVA 
forces  on  a  beach,  against  fixed  enemy  positions  further  inland. 

2.  Original  Ship-to-Shore  Combat  Model 

The  ship-to-shore  combat  model  used  as  a  basis  for  this  thesis 
was  presented  in  a  thesis  by  David  L.  Chadwick  [Ref.  2].  It  modeled 
the  amphibious  assault  of  five  waves  of  LVA  against  a  defensive  force 
composed  of  tanks  and  antitank  guided  missiles  (ATGM)  in  fixed  positions 
ashore.  Attrition  was  modeled  using  Lanchester  area-fire  and  aimed-fire 
equations.  The  purpose  of  developing  such  a  model  was  to  determine  the 
optimal  design  characteristics  of  LVA  in  an  amphibious  assault  for  a 
given  combat  scenario.  The  optimal  design  of  an  LVA  was  considered 
to  be  that  design  which  produced  the  lowest  level  of  LVA  attrition  for 
the  given  combat  scenario. 

3.  Original  Land  Combat  Model 

The  land  combat  model  used  as  a  basis  for  this  thesis  was 
developed  in  Joseph  Smoler's  thesis  [Ref.  3].  It  modeled  land  combat 
conducted  by  three  aggressor  force  units  utilizing  tanks  assaulting 
three  defensive  force  units  armed  with  Tube-Launched,  Optical -Guided, 
Wire-Controlled  missiles  (TOW's)  in  fixed  positions.  The  location  of 
the  land  combat  was  the  Fulda  Gap  region  in  West  Germany.  Attrition 
was  modeled  using  Lanchester  aimed-fire  equations.  The  purpose  of 
Smoler's  thesis  was  to  develop  a  basic  small -unit  land  combat  model  for 
determining  optimal  defensive  unit  locations  for  a  given  combat  scenario. 
The  optimal  locations  of  the  defensive  units  were  considered  to  be  those 
locations  which  provided  the  lowest  level  of  attrition  of  the  defensive 
units  for  the  given  combat  scenario. 
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4.  The  Enhanced  Land  Combat  Model 

An  enhanced  version  of  Smoler's  land  combat  model  was  developed 
by  Glenn  Mills  in  his  thesis  [Ref.  4].  The  enhancements  developed  by 
Mills  added  flexibility  to  Smoler's  land  combat  model  by  providing 
user  selected  options  which  could  be  employed  depending  upon  the  abili- 
ties and  desires  of  the  model's  user.  The  enhancements  included  the 
option  of  altering  the  aggressor  force's  attack  routes  enabling  the  user 
to  study  not  only  the  optimal  defensive  unit  locations,  but  the  optimal 
aggressor  force  attack  routes  for  the  given  defensive  unit  locations  as 
well . 

A  second  enhancement  was  the  option  of  selecting  a  stochastic 
attrition-rate  coefficient.  This  introduced  the  element  of  randomness 
into  the  model's  attrition  algorithm  providing  a  more  realistic  approach 
to  modeling  a  unit's  fighting  effectiveness. 

The  third  enhancement  is  the  option  of  providing  alternate 
defensive  positions  so  that  the  defensive  units  could  move  to  more 
defensible  terrain  once  their  original  positions  had  become  untenable. 

5.  The  Original  Small -Unit  Amphibious  Warfare  Model 

The  original  small -unit  amphibious  warfare  model  used  as  a 
basis  for  this  thesis  was  developed  by  Soon  Dae  Park  in  his  thesis 
[Ref.  5].  Park's  model  attempted  to  conceptualize  the  flow  of  events 
of  an  amphibious  assault  by  first  running  the  ship-to-shore  model, 
followed  immediately  by  running  the  land  combat  model.  The  analysis 
of  this  model  as  a  class  project  served  as  the  catalyst  for  the  develop- 
ment of  the  small -unit  amphibious  operation  combat  model  presented  in 
this  thesis. 
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6.  The  Analysis  of  Park's  Model 

The  class  project  conducted  by  Clay  Grubb,  Robert  Larson,  and 
this  author  had  as  its  purpose  the  analysis  of  Soon  Dae  Park's  small  - 
unit  amphibious  operation  combat  model.  The  results  of  the  analysis 
revealed  the  value  of  Park's  thesis  in  providing  a  general  scheme  of 
events  for  the  modeling  of  small-unit  amphibious  operations.  The  results 
also  identified  some  enhancements  that  could  be  applied  to  his  conceptua- 
lized model  that  would  integrate  the  ship-to-shore  and  land  combat  models 
into  a  singular  small-unit  amphibious  operation  combat  model.  The  develop- 
ment and  application  of  these  enhancements  to  Park's  model  served  as  the 
founcation  for  this  thesis,  and  the  development  of  the  model  presented. 

C.  ^AJ0R  GOAL  AND  OBJECTIVES  OF  THE  THESIS 

1 .  Major  Goal  of  the  Thesis 

The  overall  goal  of  the  thesis  is  the  development  of  a  small -unit 
amphibious  operation  combat  model.   It  will  be  based  on  the  integration 
and  enhancement  of  the  two  combat  models  discussed  in  the  previous  section 
of  this  chapter.  There  are  three  underlying  objectives  of  the  thesis 
which  will  guide  the  development  of  the  model  toward  the  accomplishment 
of  this  goal . 

2.  Objectives  of  the  Thesis 

a.  Integration  of  Independent  Combat  Models 

The  first  objective  in  the  development  of  the  model  was  to 
integrate  two  initially  independent  combat  models  into  a  singular  con- 
tinuous flow  combat  model.  This  was  accomplished  by  first  allowing 
force  levels  at  the  completion  of  the  ship-to-shore  phase  of  combat  to 
be  used  as  the  initial  force  levels  in  the  land  phase  of  combat. 
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Secondly,  it  was  recognized  that  four  combat  modelers  con- 
tributed to  the  resulting  model  presented  by  Park  in  his  thesis.  As 
such,  four  individualized  FORTRAN  coding  techniques  were  reformulated 
into  one  style  to  provide  a  more  tractible  small -unit  amphibious  oper- 
ation combat  model . 

b.  User-Friendly  Input-Data  and  Output  Structure 

The  second  objective  of  the  thesis  was  to  provide  a  user- 
friendly  combat  model.  It  is  a  major  contention  of  this  thesis  that 
combat  modelers  have  not  adhered  closely  to  this  principle  when  pro- 
viding combat  models  for  the  United  States  military.  Furthermore,  it 
is  believed  that  the  lack  of  concern  given  to  this  approach  of  combat 
modeling  is  a  major  reason  for  the  less  than  unanimous  reception  that 
combat  models  nave  received  by  the  United  States  military  as  tools  for 
training  its  commanders  aid  staffs.  Therefore,  the  model  presented  in 
this  thesis  was  designed  and  documented  with  the  user's  capabilities 
and  needs  in  mind  as  opposed  to  those  of  the  programmer. 

c.  Student-Oriented  Combat  Model 

The  third  objective  of  the  thesis  was  to  provide  the  student 
of  combat  modeling  with  a  combat  model  which  was  easily  understood  and 
studied.  As  a  result,  the  model  presented  in  this  thesis  was  designed 
with  a  low  level  of  complexity  to  allow  the  student  with  little  or  no 
experience  in  combat  modeling  to  understand  more  easily  the  combat 
modeling  theory  and  its  application. 
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I I .  MODEL  ENHANCEMENTS 

A.  OVERVIEW 

This  thesis  had  as  its  goal  the  development  of  a  small -unit  amphibious 
operation  combat  model.  Guided  by  the  three  objectives  discussed  in 
Chapter  One,  five  modeling  enhancements  were  aoplied  to  the  two  original 
combat  models  serving  as  the  foundation  for  the  resulting  small -unit 
amphibious  operation  combat  model  presented  in  this  thesis.  The  enhance- 
ments provide  for  the  proper  integration  of  the  ship-to-shore  and  land 
combat  models.   In  addition,  they  have  contribjted  to  the  development 
of  a  more  user-friendly  combat  model  which  can  be  used  to  assist  combat 
modeling  students  in  their  understanding  the  tieory  of  combat  modeling 
and  its  appl ication. 

B.  INTEGRATION  OF  SHIP-TO-SHORE  AND  LAND  COMBAT  MODELS 

The  intent  of  the  model  presented  here  is  to  view  the  amphibious 
assault  as  a  continuous  process  made  up  of  two  phases  of  combat  (ship- 
to-shore,  and  land  combat)  where  the  land  combat  phase  is  dependent 
upon  the  outcome  of  the  ship-to-shore  combat  piase  of  the  model . 

Implementation  of  this  enhancement  ca1led  for  the  creation  of  a 
new  variable,  Total  Landing  Force  Ashore  (TLF),  which  would  accumulate 
the  surviving  landing  force  of  each  assault  wave  as  it  reached  the  beach. 
This  total  landing  force  ashore  would  than  be  redistributed  into  three 
main  assault  units  for  the  land  combat  phase  of  the  model.  The 
rationale  for  the  redistribution  of  forces  is  based  on  realistic 
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military  doctrine  which  is  to  maintain  a  well-balanced  force  when  the 
strength  and  location  of  the  enemy  is  unknown  to  the  assaulting  forces 
(as  is  assumed  in  the  model). 

Since  the  manner  in  which  defender  force  levels  are  determined  by 
the  ship-to-shore  and  land  combat  models  appears  to  be  quite  realistic, 
the  defending  force  level  as  modeled  by  Soon  Dae  Park  was  used  as  input 
to  the  land  combat  phase.  In  particular,  if  the  aggressor  force  had  been 
successful  in  routing  the  defending  forces  situated  on  the  beach, 
defending  forces  situated  further  inland  naturally  would  be  impelled 
to  defend  the  remaining  terrain  still  in  their  possession.  It  should 
be  noted  that  the  size  of  these  defending  forces  further  inland  is  an 
option  of  the  user  which  in  itself  can  be  varied  for  analysis  of  variant 
battle  scenarios. 

C.  AGGRESSOR  FORCE  ATTRITION— SHIP-TO-SHORE  PHASE 

Attrition  in  Lanchester-type  combat  modeling  is  based  upon  the 
expected  percentage  of  the  original  force  remaining  at  a  giver  point: 
in  time.  The  expected  percentage  of  forces  remaining  then  zev   be 
restated  in  terms  of  a  real  number  to  represent  the  expected  number  of 
forces  remaining.  This  method  of  computing  reduced  force  levels  is 
considered  to  be  quite  appropriate  when  modeling  land  combat,  and  was 
implemented  by  Chadwick  in  his  ship-to-shore  combat  model  to  simulate 
LVA  attrition.  However,  use  of  Lanchester  equations  to  model  such 
vehicular  attrition  of  a  vehicle  at  sea  was  determined  to  be  inappro- 
priate. Where  it  is  a  reasonable  assumption  that  a  disabled  vehicle 
on  land  still  can  contribute  something  toward  the  final  outcome  of 
the  battle  if  any  of  its  weapons  systems  or  onboard  troops  survive, 
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an  LVA  that  is  disabled  at  sea  is  of  no  use  to  the  amphibious  assault 
and  subsequent  land  combat  phase.  The  LVA  will  be  recovered,  and  on- 
board troops  brought  to  the  landing  site  after  the  assault  has  taken 
place. 

Chadwick  was  not  concerned  with  this  distinction  due  to  his  model's 
purpose  of  modeling  LVA  attrition  in  terms  of  ship-to-shore  movement 
only.  Therefore,  he  simply  utilized  Lanchester  equations  in  modeling 
LVA  attrition  resulting  in  fractional ized  losses  of  assaulting  LVA's. 
However,  if  a  ship-to-shore  combat  model  is  to  be  properly  integrated 
with  a  land  combat  model,  only  whole  numbers  of  LVA's  ashore  should  be 
used  as  input.  Hence,  an  enhancement  was  made  to  the  model. 

The  approach  was  to  find  the  integer  value  of  the  number  of  surviv- 
ing LVA's  in  each  assault  wave,  and  then  sum  these  values  resulting 
in  the  total  landing  force  ashore  (TLF) .  The  fractional  portion  remain- 
ing was  considered  to  be  those  LVA's  disabled  at  sea  and  unable  to 
participate  in  the  land  combat  phase  of  the  operation. 

D.  STOCHASTIC  ATTRITION-RATE  COEFFICIENT  MODIFICATION 

Mill's  land  combat  model  allowed  the  user  the  option  of  selecting 
either  deterministic  or  stochastic  attrition-rate  coefficients  to  be 
used  in  assessing  the  attrition  of  opposing  forces.  The  justification 
for  utilizing  stochastic  attrition-rate  coefficients  to  model  force-on- 
force  attrition  rates  was  based  upon  the  assumption  that  the  attrition- 
rate  coefficient  is  a  random  quantity  measuring  a  unit's  fighting 
ability,  and  can  be  estimated  before  any  given  battle. 

This  can  be  illustrated  by  considering  the  expected  value  of  a 
random  variable.  For  example,  assume  a  probability  distribution  is 
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selected  for  the  random  variable  such  that  the  expected  value  of  the 

random  variable  is  equal  to  the  deterministic  attrition-rate  coefficient 

set  for  all  units.  When  a  random  sample  is  taken  from  this  distribution, 

the  individual  values  assigned  the  random  variable  will  serve  as 

individual  unit  attrition-rate  coefficients,  where  the  sample  mean 

will  serve  as  the  overall  force  attrition-rate  coefficient.  The  result 

is  that  the  overall  force  attrition-rate  is  equal  to  the  sample  mean, 

which  is  approximately  equal  to  the  population  mean  of  the  random 

variable.  Recalling  that  this  population  was  selected  with  a  mean 

that  equalled  the  deterministic  attrition-rate  coefficient,  units  now 

have  their  own  individual  attrition-rate  coefficients,  while  the  force 

attrition-rate  coefficient  has  remained  close  to  the  intended  value  of 

the  deterministic  attrition-rate  coefficient.  This  is  more  realistic 

than  the  deterministic  option  since  each  unit  would  be  expected  to 

have  a  different  level  of  effectiveness,  which  necessarily  would  imply 

different  attrition  rates  while  maintaining  one  overall  force  level 

attrition  rate. 

The  attrition-rate  coefficient,  A;.,  is  used  as  the  measure  of  the 

rate  a  fi rer  in  Unit  i  attrits  a  target  in  Unit  j.  This  has  been 

likened  to  the  fighting  effectiveness  of  a  particular  Unit  i.  Obviously, 

this  is  a  variable  quantity  influenced  by  a  myriad  of  factors  to  include 

esprit  de  corps,  past  history  of  success  or  failure,  prior  exposure  to 

combat,  weather,  quality  of  leadership,  etc.  The  intent  of  such  a 

basic  model  as  this  is  to  attempt  to  capture  the  overall  effect  of 

these  factors  by  developing  a  distribution  of  a  unit's  initial  fighting 

capabilities  (specifically,  to  develop  a  distribution  of  A^'s  for  the 

unit) . 
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Mills  proposed  a  distribution  based  upon  a  quadradic  function  which 
would  produce  a  symmetric  distribution  with  a  mean  value  of  approximately 
0.55.  This  distribution  restricted  a  unit's  maximum  effectiveness  to 
only  80  percent  of  its  maximum  capable  effectiveness  level.  It  also 
implied  that  the  average  unit  in  combat  will  only  perform  at  55  percent 
of  its  maximum  effectiveness  level  at  any  given  time. 

A  more  plausible  way  of  assigning  a  distribution  to  the  A.-'s  might 
be  a  truncated  Normal  Distribution  limited  to  values  between  0.00  and 
1.00.  However,  this  approach  would  leave  little  flexibility  in  terms 
of  modeling  variant  scenarios  since  the  opposing  forces  always  would 
have  attrition-rate  coefficients  associated  with  that  particular  dis- 
tribution whenever  the  stochastic  option  was  selected.  This  restriction 
is  due  to  the  programming  constraints  encountered  in  attempting  to 
implement  variant  truncated  Normal  Distributions  in  the  model.  There- 
fore, a  Beta  Distribution  was  selected  for  use  in  the  model. 

The  natural  range  of  the  Beta  Distribution  is  from  0.00  to  1.00 
thereby  alleviating  the  burden  of  constructing  a  truncated  distribution. 
Furthermore,  its  two  scaling  parameters,  P  and  Q,  can  be  selected  readily 
and  input  by  the  user  to  construct  virtually  any  variant  of  the  Beta 
Distribution  so  desired.  The  specific  values  selected  for  P  and  Q  would 
parameterize  the  distribution  of  the  A.-'s  according  to  the  user's  par- 
ticular combat  scenario  without  the  burden  of  reprogramming  the  distri- 
bution on  each  successive  run  of  the  model . 

The  density  function  for  the  Beta  Distribution  is  as  follows: 

f(x)  =  xP_1(l-X)Q"1  for  0.0<x4l.O 

p 
with  v 


x   P+Q 
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Therefore,  a  P=21  and  Q=7  would  yield  a  distribution  of  A..'s  with  a 
mean  of  0.75.  This  says  that  a  unit  with  an  A.,  of  0.75  is  operating 
at  75  percent  of  its  potential  effectiveness.  Whereas,  a  P=7  and  Q=21 
would  yield  a  distribution  of  A-.'s  wi"h  a  mean  of  0.25,  indicating  that 
a  unit  is  operating  at  25  percent  of  its  potential  effectiveness. 

To  illustrate  the  flexibility  of  this  approach  in  determining  sto- 
chastic attrition-rate  coefficients,  Figure  2-1  is  provided  displaying 
the  distribution  of  A. •  *s  that  would  be  obtained  when  the  user  alters 
the  parameters  of  the  Beta  Distribution.  The  user  now  can  model  a 
strong  elite  force  using,  for  example,  parameter  values  P=21 ,  Q=7 ,  or 
model  a  weak  and  poorly  lead  force  using  parameter  values  P=7  and  Q=21 , 
depending  upon  the  particular  battle  scenario  the  user  is  analyzing. 

While  the  Beta  Distribution  used  in  this  thesis  is  different  than 
the  Quadradic  Distribution  used  by  Glenn  Mills,  the  implementation  of 
this  distribution  for  the  attrition-rate  coefficients  is  exactly  the 
same  as  originally  modeled.  Since  it  was  assumed  earlier  that  the  fight- 
ing effectiveness  of  each  unit  is  a  random  quantity  prior  to  a  given 
battle,  it  is  only  necessary  to  obtain  a  realization  of  the  random 
variable  for  each  unit  prior  to  the  initialization  of  the  battle.  This 
realization,  A° . ,  is  determined  by  the  user-supplied  inputs  P  and  Q, 
and  subsequent  calls  to  a  Beta  Distribution  Random  Deviate  Generator 
[Ref.  6].  Therefore,  an  attrition-rate  coefficient  is  computed  for 
each  unit  using  the  following  equation: 


f  A0,  x  (1  -  r/r  T   for  0  4  r  <=  rc 
ij   x      e'  * 


A..  =< 


for  r    ±  r 
e 
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Where:  A..  =  Realization  of  unit's  fighting  effectiveness 
r   =  Current  range  between  fi rer  and  target 
re  =  Maximum  effective  range  of  a  firer's  weapon 
This  function  was  utilized  because  it  is  a  function  of  both  range  and 
Ai  .  thus  creating  a  different  attrition-rate  curve  for  each  unit, 
depending  on  that  unit's  effectiveness  level  prior  to  the  battle.  A 
graphic  illustration  of  an  attrition-rate  coefficient  curve  for  an 
Ai  .  equal  to  a  mean  of  0.75  from  the  Beta  Distribution  where  P=21  and 
Q=7,  and  the  maximum  effective  range  r  ,  of  3000  meters  would  look 
like  Figure  2-2. 


A° 


ij 


1000 


2000 


3000    Range  (meters) 


Figure  2-2.  Attrition-Rate  Coefficient  Curve  for  A  .  =  0.75 
and  r  =  3000m  1J 


To  illustrate  the  effect  that  this  stochastic  attrition  option  has 
on  the  outcome  of  the  model,  two  runs  of  the  model  were  made  using  this 
option,  while  varying  the  Beta  Distribution  parameter  values  for  both 
forces  on  each  run.  All  other  characteristics  of  both  forces  were  left 
unaltered.   In  the  first  run,  the  aggressor  forces  were  modeled  to 
operate  at  75  percent  of  their  potential  effectiveness,  and  the  defending 
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forces  were  modeled  to  operate  at  25  percent  of  their  potential  effec- 
tiveness. The  battle  outcome,  as  listed  in  Table  2-1,  indicates  that 
the  aggressor  forces  won  the  battle.  In  the  second  run,  the  potential 
effectiveness  of  the  opposing  forces  was  reversed.  The  aggressor  forces 
were  now  modeled  to  operate  at  25  percent  of  their  potential  effective- 
ness, and  the  defending  forces  were  modeled  to  operate  at  75  percent  of 
their  potential  effectiveness.  The  battle  outcome,  as  listed  in  Table 
2-1,  indicates  that  the  battle  was  terminated  due  to  the  opposing  forces 
being  too  close.  The  aggressor  forces  were  unable  to  overrun  the  defend- 
ing forces,  as  was  the  case  in  the  first  run,  which  was  due  solely  to  the 
change  in  the  potential  fighting  effectiveness  of  the  opposing  forces. 

A  change  in  the  battle  outcome  was  expected;  however,  to  what  degree 
that  change  would  be  was  unknown.  The  fact  that  the  defender  forces 
were  unable  to  win  the  battle  on  the  second  run,  while  having  a  much 
higher  level  of  effectiveness,  indicates  that  other  characteristics  of 
the  opposing  forces  were  also  playing  an  important  role  in  the  battle 
(e.g.,  types  of  weapons  employed,  original  force  levels,  speed  of  attack, 
etc.) . 

Through  the  use  of  the  stochastic  attrition  option,  the  user  now 
has  the  capability  of  studying  one  more  facet  of  combat  (i.e.,  potential 
fighting  effectiveness),  and  can  analyze  to  what  degree  different  fight- 
ing effectiveness  levels  will  have  on  final  battle  outcome. 

E.   USER-FRIENDLY  I/O  STRUCTURE 

A  significant  and  important  part  of  writing  a  computer  program  for 
a  combat  model  is  to  provide  for  the  input  and  output  of  data  to  and 
from  the  program.  It  is  my  belief  that  one  of  the  major  factors 
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contributing  to  the  lukewarm  reception,  in  general,  that  combat  models 
have  received  by  the  United  States  military  is  due,  in  part,  to  the 
poorly  designed  input-data  and  output  structure  of  the  combat  models. 
The  primary  user  of  those  models,  the  military  commander,  normally 
finds  it  difficult  to  decipher  the  myriad  of  input-data  requirements, 
or  the  voluminous  output  from  combat  models  that  supposedly  were  de- 
signed for  the  commander's  use.   It  is  a  contention  of  this  thesis  that 
if  more  attention  was  given  to  the  development  of  user-friendly  input- 
data/output  requirements,  that  more  interest  would  be  generated  toward 
the  use  of  such  models  in  training  military  commanders.  Therefore,  an 
enhancement  was  made  to  the  input-data  and  output  requirements  of  the 
model  to  demonstrate  a  method  of  alleviating  this  problem. 
1  .  User-Friendly  Input  Structure 

A  readymade  input  data  file  was  provided  with  the  model  to  serve 
as  a  guide  for  entering  all  of  the  required  data  in  the  correct  format 
required  by  the  model  (see  Appendix  C).  Each  variable  requiring  input 
for  the  model  has  been  listed  in  the  sample  input  file  with  sufficient 
space  provided  for  ensuring  that  data  is  entered  in  the  correct  format. 
This  file,  therefore,  provides  the  unfamiliar  user  of  the  model  with  the 
opportunity  to  utilize  the  model  with  only  a  limited  knowledge  of  the 
model's  algorithm  and  input  requirements.  This  type  of  user-oriented 
input  requirement  will  alleviate  some  of  the  apprehension  that  an  unfamil 
iar  user  of  the  program  might  have,  and  might  actually  act  as  a  catalyst 
in  increasing  the  amount  of  use  the  model  receives. 
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2.  User-Frierfdly  Output  Structure 

Indecipherable  output,  or  too  much  output  from  a  model,  can  be 
just  as  much  of  a  deterrent  to  a  model's  use  as  complex  input  require- 
ments can  be.  This  point  was  brought  out  by  Ye  S.  Venttsal  in  her  dis- 
cussion of  good  combat  models: 

It  is  advisable  in  such  "training"  modeling  of  combat  actions 
that  the  commander  receive  information  from  the  computer  not  in 
the  form  of  mean  characteristics  averaged  over  a  set  of  realiza- 
tions, but  rather  in  the  form  of  only  one  specific  realization, 
on  the  basis  of  which  a  decision  is  in  fact  made.  [Ref.  7] 

To  paraphrase  Venttsal,  the  combat  model  output  must  be  clear, 
concise,  and  identifiable  to  the  military  commander.   Furthermore,  it 
must  answer  the  questions  that  were  originally  asked  by  the  user—speci- 
fically, who  won  and  why? 

The  model  output  was  therefore  restructured  to  provide  a  concise 
listing  of  what  input  parameters  were  entered  into  the  program  for  pro- 
cessing, and  a  concise  and  understandable  output  sunmary  of  what  occurred 
throughout  the  battle  (see  Appendix  F).  Additional  y,  a  new  feature  was 
introduced  into  the  model  which  gives  the  user  the  option  of  viewing 
either  a  detailed  time-step  battle  summary,  or  just  a  final  battle  summary 
of  what  occurred  in  the  running  of  the  model. 

F.   DOCUMENTATION  AND  PROGRAM  FORMAT 

Two  of  the  objectives  of  the  model  presented  in  this  thesis  were 
first  to  serve  as  an  example  of  the  way  in  which  combat  models  should 
be  designed  to  be  user-friendly  to  ensure  their  acceptance  and  use  in 
training  military  commanders;  and  secondly,  to  serve  as  a  model  for 
combat-modeling  students  so  that  they  might  acquire  a  better  understand- 
ing of  how  combat  models  ought  to  be  programmed  into  a  computer. 
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It  already  has  been  discussed  how  the  user-friendly  I/O  structure  assists 
the  user  of  the  model.  However,  proper  structuring  of  programs  for  read- 
ability and  good  documentation  is  equally  necessary  to  ensure  readability 
and  understanding  by  students  and  analysts. 

The  FORTRAN  program  presented  in  this  thesis  which  integrated  and 
enhanced  the  ship-to-shore  and  land  combat  models  is  an  amalgamation  of 
subroutines  originally  written  by  different  people,  with  their  own  unique 
style  of  programming.  The  interweaving  of  these  four  styles  of  program- 
ming throughout  the  program  seriously  detracted  from  the  smooth  flew  of 
program  structure  and  readability  desired  when  analyzing  the  computer 
program.  Therefore,  an  enhancement  was  made  to  the  model:  the  program 
was  restructured  so  that  it  would  follow  one  basic  style  of  programming 
(see  Appendix  B).  New  labeling  and  structuring  of  formatted  statements 
and  nested  FORTRAN  functions  were  provided  to  make  the  computer  program 
more  readable.  This  restructuring  should  assist  the  student  in  under- 
standing the  program  flow,  and  provide  an  incentive  to  those  interested 
students  to  develop  future  enhancements  to  the  model . 

In  addition  to  developing  one  style  of  programming,  more  detailed 
documentation  of  variable  definitions  and  descriptions  of  program  flow 
were  added  to  the  program.  The  purpose  of  this  documentation  was  to 
have  the  program  serve  as  a  reference  to  itself  in  order  that  the  reader 
would  not  be  forced  to  refer  to  various  manuals  outside  of  the  program 
each  time  an  explanation  of  the  functioning  of  a  particular  aspect  of 
the  program  is  desired. 
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III.      CURRENT  MODEL  DESIGN 

A.  OVERVIEW 

The  small -unit  amphibious  operation  combat  model  presented  in  this 
thesis  consists  of  the  integration  and  enhancement  of  a  ship-to-shore 
combat  submodel,  and  a  land  combat  submodel.  Both  of  the  original  sub- 
models were  similar  in  design,  basing  force  attrition  on  Lanchester- 
type  expected-value  equations.  As  presented  earlier,  enhancements  to 
both  submodels  reduced  the  differences  in  design  of  these  submodels, 
molding  them  into  what  may  be  called  a  small -unit  amphibious  operation 
combat  model.  Figure  3-1  provides  the  scheme  for  the  sequence  and 
general  flow  of  events  in  the  overall  model. 

It  should  be  noted  that  although  the  ship-to-shore  and  land  combat 
models  are  quite  similar,  they  still  have  their  own  unique  characteristics 
in  modeling  certain  events  that  take  place  throughout  the  battle.  There- 
fore, in  discussing  the  model  as  a  whole,  the  two  phases  of  the  battle 
will  be  addressed  separately,  and  those  events  which  are  of  particular 
interest  in  each  phase  of  combat  will  be  elaborated  on  in  order  that  the 
reader  might  acquire  an  overall  appreciation  of  the  contributions  each 
submodel  makes  to  the  overall  model. 

B.  SHIP-TO-SHORE  PHASE 
1 .  Overview 

Since  the  objectives  of  the  thesis  are  to  provide  a  user-friendly 
tractible  combat  model,  a  number  of  broad  assumptions  have  been  made 
regarding  the  exact  method  of  employment  of  the  LVA  in  the  ship-to-shore 
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Figure  3-1.  Generalized  Flowchart  for  Small -Unit 
Amphibious  Operation  Combat  Model 
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phase  of  the  amphibious  operation.  First  of  all,  it  is  envisioned  that 
for  command  and  control  purposes,  as  well  as  for  mine  clearing  operations, 
there  will  exist  LVA  approach  lanes  as  depicted  in  Figure  3-2,  along  which 
columns  of  LVA  will  transit  a  25-mile  distance  to  shore  from  the  Amphibious 
Task  Force  (ATF).  The  25-mile  distance  is  based  upon  recent  requirements 
studies  indicating  that  in  future  amphibious  operations,  due  to  the 
increased  lethality  of  anti-ship  missiles  and  long  range  artillery,  it 
will  be  necessary  to  increase  the  Amphibious  Task  Force  standoff  distance 
to  approximately  25  miles  from  shore  to  reduce  the  vulnerability  of  the 
amphibious  shipping  against  this  anticipated  threat  [Ref.  8].  Secondly, 
it  is  assumed  that  a  maneuver  area  will  exist  within  which  the  columns  of 
waves  of  LVA  will  form  into  a  conventional  landing  formation  composed  of 
waves  of  landing  craft  as  prescribed  by  current  doctrine. 

The  two  previous  assumptions  set  the  stage  for  the  primary  assump- 
tion used  in  computing  LVA  force  level  attrition:  that  is,  direct  fire 
weapons  will  be  assumed  to  be  the  primary  anti-LVA  threat  -- specifically, 
modified  versions  of  current  tank  and  antitank  guided  missiles  (ATGM) 
assets.  Although  in  reality  some  attrition  of  LVA  can  be  expected  in 
the  maneuver  area,  it  will  be  assumed  that  the  critical  exposure  period 
will  be  that  port" on  of  time  in  the  ship-to-shore  movement  that  the  first 
assault  wave  comes  within  5,000  meters  of  the  shore  defenses  until,  up  to, 
and  including  the  arrival  of  the  last  assault  wave  ashore.  Figure  3-3  is 
a  flowchart  depicting  the  general  sequence  of  events  of  the  ship-to-shore 
phase  model . 

2.  LVA  Movement  Conceptualization 

Two  tactical  decision  variables  were  utilized  for  modeling  LVA 
ship-to-shore  movement: 
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Figure  3-3.     Generalized  Flowchart  for  Ship-To-Shore  Phase 
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— TBW  is  the  decision  variable  for  the  time  between  successive 
waves.  As  TBW  is  shortened,  coordination  problems  will  arise  resulting  in 
confusion  on  the  beach  due  to  insufficient  time  provided  for  an  assault 
wave  to  move  inland  prior  to  the  next  wave's  arrival.  The  level  of  con- 
fusion generated  by  a  short  TBW  must  be  balanced  against  the  cost  of  not 
having  sufficiently  rapid  initial  buildup  of  offensive  forces  ashore. 

--RD  is  the  distance  from  the  shoreline  that  each  wave  will 
commence  the  transition  from  planning  model  to  displacement  mode.  This 
process  will  be  termed  a  sequential  wave  transition  since  each  of  the 
assault  waves  sequentially  performs  the  mode  transition.  This  is  illus- 
trated in  Figure  3-4.  The  reason  for  this  transition  is  due  to  engineer- 
ing stability  requirements  that  this  displacement  configuration  be 
achieved  prior  to  crossing  the  surf  line.  The  obvious  effect  of  this 
transition  is  that  exposure  time  to  close-in  direct-aimed  fire  will  be 
created. 

3.  Overall  Force  Structure 

The  model  aggregates  the  combat  organizations  involved  in  the 
ship-to-shore  phase  of  the  amphibious  operation  into  several  homogeneous 
combat  units.  Each  unit  is  characterized  by  certain  offensive  and 
defensive  capabilities  in  comparison  to  each  of  the  other  units. 

Table  3-1  illustrates  the  combat  organizations  which  have  been 
explicitly  modeled.  The  force  level  of  each  unit  was  represented  by 
state  variables  as  indicated.  The  initial  force  level  for  each  unit  is 
input-data  to  the  model.  This,  therefore,  permits  the  user  to  investi- 
gate alternative  wave  composition  options  as  well  as  various  defensive 
scenarios  without  having  to  make  modifications  to  the  model  algorithm. 
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Table  3-1.  State  Variables  Representing  Combat  Organizations 


Ccmbat  Organization 


State  Variable 


Shore  Defenses  -  Tank  Assets 

Shore  Defenses  -  ATGM  Assets 

Incoming  assault  Waves  of  LVA 
representing  waves  1  thru  5 

A  cumulative  combat  force 
comprised  of  those  Marine 
grounc  units  which  have 
arrived  on  the  beach  and 
debarked  their  LVA 

Fire  support  assets  of  the 
amphibious  task  force 


DT 

DS 

WV ( I )  1=1  thru  5 


TLF 
ATFFS 


The  tactical  ccmbat  interactions  that  exist  between  these  nine  combat 
units  within  the  overall  force  structure  are  illustrated  in  Figure  3-5. 
4.  Shore-jefense  Scenario 

T're  defensive  scenario  utilized  in  the  model  includes  a  force 
comprised  of  both  tank  (DT)  and  antitank  guided  missiles  (DS).  Tank 
and  ATGM  units  are  emplaced  75  meters  inland  of  the  waterline  at  an 
elevation  of  approximately  5-10  meters.  The  model  does  not  explicitly 
maneuver  or  emplace  individual  tanks  or  ATGM  systems  within  each  unit, 
but  aggregates  the  cumulative  effects  of  the  individual  vehicles  and 
weapons  within  each  category. 

a.  Defensive  Unit  Force  Levels 

The  state  variables  DT  and  DS  represent  the  total  unit 
"strengths"  in  each  of  the  defensive  unit  categories.  Specifically,  a 
DT=3  indicates  that  within  the  shore  defenses  there  exists  a  unit  of 
tanks  having  a  total  combat  effectiveness  equivalent  to  three  continuously 
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firing  independent  weapon  systems.  A  similar  interpretation  is  applicable 
to  the  state  variable  DS. 

b.  Defensive  Fire  Allocation 

The  two  categories  of  direct-fire  weapons  are  assumed  to 
engage  targets  (incoming  LVA)  according  to  a  predetermined  tactical  scheme. 
The  defensive  "plan"  was  parameterized  as  follows: 

(1)  Window  of  Engagement.  Each  weapon  category  was  assigned 
an  engagement  window  as  illustrated  in  Figure  3-6.  Onl>  those  LVA  located 
within  the  range  window  could  be  fired  upon  by  the  shore  defensive  forces. 
The  windows  are  designated  by  the  following  input  parameters: 

TANK     ATGM 
Maximum  Engagement  Range    TENGMX    SENGMX 
Minimum  Engagement  Range    TENGMN    SENGMN 

(2)  Engagement  Rules.  Additional  defensive  tactical  criteria 
are  implemented  into  the  model  logic  according  to  Lhe  following  rules  of 
engagement: 

--A  defensive  weapon  may  only  engage  the  two  closest  incom- 
ing waves  if  more  than  two  waves  of  LVA  are  at  any  time  located  within  the 
weapon's  engagement  window. 

--If  only  one  wave  of  LVA  is  present  in  a  weapon's  engage- 
ment window,  defensive  fires  of  that  particular  weapon  type  will  be  dis- 
tributed uniformly  against  the  surviving  LVA  in  that  wave. 

--If  two  waves  of  LVA  are  both  contained  within  the  engage- 
ment window,  defensive  fires  of  that  particular  weapon  type  will  be 
distributed  according  to  a  tactical  allocation  submodel.  A  weighting 
factor,  (DEFwT),  input  by  the  user  is  utilized  in  establishing  the 
proportion  of  the  total  weapon  strength  to  be  allocated  against  the 
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surviving  LVA's  in  each  of  the  two  waves.  Specifically,  if  DEFWT(l)  =  2, 
and  DEFWT(2)  =  1,  then  each  surviving  LVA  in  the  closer  of  the  two  incom- 
ing waves  would  be  allocated  twice  as  much  fire  as  surviving  LVA  in  the 
seaward  wave.  For  example,  if  waves  three  and  four  were  both  located 
within  the  ATGM  engagement  window,  then  the  proportion  of  DS's  fire 
allocated  to  surviving  LVA  in  wave  three  would  be: 

DEFWT(l)  x  WV(3) 

—  x  DS 


DEFWT(l)  x  WV(3)  +  DEFWT(2)  x  WV(4) 

where:  WV(3)  is  the  state  variable  for  the 
current  number  of  survivors  in  wave  3 

c.  Attrition-Rate  Coefficient  Computation 

The  classical  Lanchester  hypothesis  for  aimed-fire  attrition 

is  that  the  casualty  rate  of  a  unit  is  proportional  to  the  size  of  the 

opposing  force.  If  a  Unit  "A"  is  being  engaged  by  a  Unit  "D",  this 

action  may  be  expressed  by  the  differential  equation: 

dA 

—  =  "BetaDA  x  D 

dt 

where:  Beta^..  is  called  the  Lanchester  attrition-rate 
coefficient 

It  is  assumed  that  this  functional  relationship  holds  for 
each  pairing  (firing  unit,  target  unit)  over  the  small  time  interval 
dt.  The  credibility  of  the  model  relates  the  performance  characteristic 
data  together  with  the  tactical  and  physical  configurations  for  each  of 
the  combat  units  to  derive  the  attrition-rate  coefficients. 

It  was  decided  to  express  the  attrition-rate  coefficients  as 

the  product  of  the  rate  of  fire  (ROF)  and  the  single  shot  kill  probability 

(P(k))  as  follows: 
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BetaDA  =  P(k)DA  x  ROFDA 

where:  DA  represents  a  Unit  "D"  firing  on  a  Unit  "A" 

More  complicated  models  exist  [Refs.  9  and  10],  however,  for  the  purposes 
of  the  modeling  of  the  ship-to-shore  LVA  and  defender  attrition,  this 
method  was  deemed  sufficient. 

Attrition-rate  coefficients  as  described  above  were  derived 
for  each  pairing  (defensive  weapon,  target)  yielding  the  ten  variables: 


BetaDT-WV(I)  ~  R0FDT-WV(I)  X  P(k)DT-WV(I) 


I  =  1-5 


and 


BetaDS-WV(I)  =  R0FDS-WV(I)  X  P(k)DS-WV(I)  l   =  1_5 
A  swit:h  mechanism  is  incorporated  into  the  rate  of  fire  (ROF)  factor  by 
implementing  the  functional  relationship: 


/ 


ROF 


D  -WV(I)  =< 


if  WV(I)  is  located  outside 
the  engagement  window 


'    if  WV(I)  is  located  within 
TRF   the  engagement  window 


where:  TBF  (Time  Between  Firings)  is  evaluated  by 

Target  Range 


TBF  =  Aim-Reload  Time  + 


Projectile  Velocity  + 
Target  Speed 


It  should  be  noted  that  the  relatively  slow  projectile  velocities  repre- 
sentative of  anticipated  ATGM  assets  in  the  future  does  cause  such 
velocities  to  become  significant  in  this  computation. 

The  second  factor  used  in  determining  each  attrition-rate 
coefficient  is  the  single-shot  kill  probability  (P(kJ).  It  is  assumed 
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that  a  hit  by  a  large  caliber  projectile  would  constitute  a  "kill"  in 
that  it  most  likely  would  inflict  damage  serious  enough  either  to  sink 
the  LVA,  or  render  it  immobile,  thus  eliminating  it  from  contributing 
to  the  buildup  ashore.  A  second  assumption  is  that  both  defensive 
weapon  systems  addressed  would  exhibit  normally  distributed,  uncorrected 
horizontal  and  vertical  errors.  Typical  dispersion  data,  both  mean  and 
standard  deviation,  for  the  Tank  and  ATGM  is  required  as  input-data  for 
the  hit  probability  computations. 

The  suppressive  effects  of  incoming  fire  upon  each  of  the 
defensive  units  was  considered  a  significant  factor  with  respect  to  its 
effect  upon  the  survivability  of  the  incoming  assault  waves  of  LVA.  It 
was  assumed  that  the  suppressive  effect  would  significantly  reduce  a 
unit's  rate  of  fire,  and  also  increase  the  error  standard  deviation.  The 
modeling  of  these  suppression  effects  was  accomplished  by  assigning  a 
relative  suppression  factor  (SUPFAC)  in  the  interval  1,  2,  to  both  the 
Tank  and  ATGM  units.  This  factor  was  determined  according  to  the 
following  guidelines: 

SUPFAC  =  1    No  incoming  fires  (i.e.,  the  defensive 
unit  casualty  rate  is  zero) 

SUPFAC  =  2    Maximum  incoming  fires  (i.e.,  the  defen- 
sive unit  casualty  rate  is  comparable  to 
that  realized  upon  full  allocation  of  the 
ATF  fire  support  assets) 

It  was  assumed  that  the  aim-reload  time  (ARTM)  would  be 

increased  by  approximately  50  percent  under  the  conditions  represented 

by  a  SUPFAC  =  2.0.  Within  the  ROF  submodel,  this  is  expressed  by  the 
linear  relationship: 

ARTMsup  =  ARTMN0NSUp  x  (0.5  +  SUPFAC  /  2.0) 
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Additionally,  it  was  assumed  that  up  to  100  percent  increase 
in  the  error  standard  deviation  could  be  expected  under  a  maximum  suppres- 
sion environment,  hence: 

ERROR  STDSUp  =  ERROR  STDN0Nsup  x  SUPFAC 

d.  Defensive  Breakpoint 

It  was  assumed  that  if  during  the  course  of  the  ship-to-shore 
movement  phase  the  defensive  forces  suffered  a  cumulative  loss  in  excess 
of  70  percent  of  their  initial  force  strength,  the  remaining  shore  defenses 
would  withdraw  and  commencement  of  the  land  combat  phase  of  the  battle 
would  take  place. 

5 .  LVA  Assault  Wave  Conceptualization 

The  model  is  programmed  to  handle  up  to  -~ive  incoming  waves  of  LVA. 
The  initial  composition  of  these  waves  is  input  oy  the  user  by  means  of 
the  variable  WVINT.  There  are  no  limitations  on  the  number  of  LVA's 
capable  of  being  in  each  wave.  However,  the  use"  is  advised  that  the 
model  was  intended  to  model  small -unit  amphibious  operations  only. 

0 

a.  Wave  Posture 

Model  functions  RNG,  HT,  and  5PD  are  called  upon  within  the 
model  logic  to  generate  the  range,  height,  and  speed,  respectively,  for 
each  assault  wave  as  time  is  incremented  throughout  the  course  of  the 
ship-to-shore  movement  phase.  The  input  of  tactical  employment  para- 
meters TBW  and  RD  in  conjunction  with  the  physical  design  parameters 
SPDMAX,  SPDMIN,  HTMAX,  and  HTMIN  for  the  LVA  being  evaluated  uniquely 
determines  the  exact  range  offshore  and  vehicle  configuration  (planning/ 
displacement)  for  each  of  the  five  waves.  This  information  then  is  imple- 
mented in  the  rate  of  fire  and  hit  probability  calculations. 
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b.  Ground  Forces  Ashore 

As  each  assault  wave  arrives  at  the  beach,  the  surviving 
strength  of  that  wave  is  transferred  to  the  variable  TLF  (Total  Landing 
Force  Ashore).  TLF  represents  a  ground  combat  force  equal  to  that  trans- 
ported by  the  number  of  LVA  survivors  having  arrived  ashore.  Once 
established,  the  TLF  engages  the  two  defensive  units  allocating  its 
fires  between  the  two  defensive  weapon  categories  in  the  same  proportion 
as  the  number  of  surviving  Tanks  and  ATGM's--that  is: 

TLFDT  =  DT  +  DS  x  TLF 

TLFDS  =  DT  +  DS  x  TLF 

The  casualty  rates  applied  against  the  DT  and  DS  state  that 

survivor  variables  are  determined  by  means  of  the  Lanchester  aimed-fire 

attrition-rate  coefficients  WBETAT,  c   nT  and  WBETAT.  r  nc   bv  the 

TLr  -  DT         TLF  -  JS  J 

equations: 

HT  =  ~WBETATLF  _  DT  x  TLFDT 

3T  "  "WBETATLF  -  DS  X  TLFDS 

The  computation  of  these  WBETA  coefficients  is  not  performed 
within  the  model  utilizing  the  detailed  rate  of  fire  and  P(hit)  arguments 
described  previously,  since  in  the  original  LVA  assault  model  developed 
by  Chadwick,  these  parameters  were  considered  to  be  insignificant  in 
relation  to  the  overall  model.  Chadwick  assumed  his  assault  model  would 
be  used  as  an  auxiliary  model  to  a  higher-level  model,  and  would  receive 
values  for  these  coefficients  from  that  model. 
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6.  ATF  Fire  Support  Conceptualization 

The  impact  of  the  amphibious  task  force's  fire  support  assets 
contribute  significantly  to  the  combat  effectiveness  of  the  shore 
defense  units.  Characterizing  each  of  the  two  defensive  force  units 
by  a  simple  "located"  or  "not  located"  attribute,  the  attrition  rates 
realized  by  these  force  units  can  be  simplified  substantially  by  the 
following  approach. 

a.  "Not  Located"  Shore  Defenses 

At  the  commencement  of  the  model  it  is  assumed  that  the 
defensive  units  DT  and  DS  are  emplaced  on  shore  at  locations  unknown  to 
the  ATF.  The  units  initially  are  engaged  as  "not  located"  targets  by 
area  fire  for  which  the  following  Lanchester  area-fire  equations  are 
appl i cable: 


dDT 
dt 

dDS 

dt 


"(ALPHADT  x  ATFFS)  x  DT 


"(ALPHADS  x  ATFFS)  x  DS 


The  terms  in  parentheses  on  the  right  hand  side  of  the  equa- 
tions are  to  be  considered  a  generalized  input  parameter.  The  combat 
effectiveness  of  the  ATF  fire  support  assets  is  also  to  be  considered 
relatively  constant  during  this  segment  of  combat  time,  and  thus  it  is 
possible  to  synthesize  these  input  factors  by  examining  the  attrition 
losses  due  to  area  realized  in  a  previous  full-scale  model  calibration  run 
b.  "Located"  Shore  Defenses 

Once  a  particular  defensive  unit  has  initiated  its  engagement 
of  incoming  waves  of  LVA  it  is  considered  located.  At  this  point  it  is 
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assumed  that  the  ATF  fire  support  organization  will  engage  that  defensive 
unit  through  the  use  of  aimed  fire.  Again  it  is  assumed  that  the  loss 
rate  will  be  in  accordance  with  the  Lanchester  hypothesis  for  aimed  fire, 
that  is: 


dDT 
dt 

dDS 
dt 


"BetaDT  x  ATFFS 


BetaDS  x  ATFFS 


It  should  be  noted  that  the  right  hand  side  of  both  of  the 
equations  is  to  be  regarded  as  synthesized  factors  to  be  calibrated 
from  a  previous  high-resolution  application. 

C.  LAND  COMBAT  PHASE 
1 .  Overview 

The  land  combat  phase,  like  the  ship-to-shore  phase,  has  been 
modeled  after  broad  assumptions  have  been  made  concerning  the  type  of 
forces  modeled  and  force  attrition.  These  assumptions  are  quite  similar 
in  nature  to  those  assumptions  made  in  the  ship-to-shore  phase  of  the 
model  which  would  be  expected  of  similar  Lanchester-type  combat  models. 

The  first  assumption  is  that  of  homogeneous  forces,  which  was 
made  as  a  matter  of  convenience.  The  defensive  forces  will  be  modeled 
as  a  Tube-Launched,  Optical-Guided,  Wire  Controlled  missile  (TOW)  company 
made  up  of  three  TOW  platoons  located  in  three  separate  and  fixed  defen- 
sive positions.  Each  TOW  platoon  will  be  comprised  of  three  TOW  sections, 
and  have  the  capability  of  withdrawing  to  an  alternate  position  provided 
as  input  by  the  user.  The  aggressor  force  ashore  will  consist  of  the 
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consolidated  surviving  landing  force  ashore  which  has  been  redistributed 
into  three  offensive  units. 

The  second  assumption  is  that  the  aggressor  force  units  will  fol- 
low three  user-defined  routes  as  they  advance  toward  the  three  defensive 
force  positions.  Routes  can  be  supplied  by  the  user,  or  defaulted  to 
preassigned  routes  dictated  by  the  program.  However,  only  three  routes 
can  be  utilized. 

A  line  of  sight  (LOS)  model  written  by  Professor  James  Hartman, 
Naval  Postgraduate  School  [Ref.  11],  is  used,  adding  great  flexibility 
to  the  modeling  of  the  terrain  in  the  basic  scenario.  This  has  a  direct 
impact  on  the  probability  of  detection  during  any  one  time  period  (t,t+dt) 
which  is  shown  as: 


P(Unit  i  does  not  detect  Unit 
j  in  a  time  period  t+dt) 
P('Jnit  i  dees  not  detect 

Unit  j  ir  a  time  per-   =  x 

iod  t+dt) 

P(Unit  i  does  not  detect  Unit 
j  in  a  time  period  t,t+dt) 


The  first  two  assumptions  provide  a  basis  for  applying  the  third 
assumption  which  is  that  attrition  of  opposing  forces  will  be  defined  by 
direct-fire  Lanchester  differential  equations  similar  to  the  ship-to- 
shore  phase,  only  modeled  in  more  detail.  Figure  3-7  provides  the  scheme 
for  the  sequence  and  general  flow  of  events  in  the  model. 
2.  LVA  Movement  Conceptualization 
a.  General 

In  the  original  model,  aggressor  force  and  defensive  force 
locations  were  modeled  in  two  different  ways.  Defensive  force  locations 
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Initialization: 

Read  input  data  (initial  positions,  routes, 
tactical  parameters,  option  selections, 
etc.,).   Initialize  variables  and  arrays 


Time  i  =  0  1 


Time  =  Time  +  10  sec 
t 


Update  locations  of  attacking  units 
i 


Check  line  of  sight  between  any  two  opponent  units 


No 


Allocate  targets 


Update  the  accumulated  detection  probabilities   p* 


Allocate  fire 


Compute  attrition 


No 


Print  battle 
summary 


Print  battle  summary 


Figure  3-7.  Generalized  Flowchart  for  Land  Combat 


46 


were  left  as  user  inputs,  whereas  aggressor  force  locations  had  been  pre- 
determined by  the  model  builder,  and  could  not  be  altered  by  the  user. 
This  allowed  a  flexibility  of  modeling  defensive  positions,  tut  flex- 
ibility was  limited  because  of  the  method  of  determining  movement  routes 
for  the  aggressors.  Glenn  Mills  provided  a  user  option  to  the  model  which 
permitted  the  user  to  model  a  variety  of  aggressor  force  movement  scenarios 
This  option  allows  for  the  choice  of  attack  routes  and  vehicle  speed.   In 
addition,  the  option  is  highly  useful  to  the  unfamiliar  user  of  the  model 
since  unit  locations  and  attack  routes  can  be  initially  set  to  the  model's 
default  values.  Different  user  selected  parameters  can  be  input  as  the 
user  acquires  a  better  understanding  of  the  model's  algorithm. 

b.  Model 

Three  predetermined  routes  are  provided  for  aggressor  force 
movements.  Each  route  is  subdivided  into  40-meter  length  intervals, 
since  a  nonfiring  aggressor  unit  is  assumed  to  move  one  such  interval 
during  a  time-step  of  10  seconds  (i.e.,  average  speed  of  9  mph).  A  firing 
aggressor  unit  is  delayed  a  specified  number  of  time-steps  before  moving 
to  the  next  interval  by  the  state  variable  NOD.  Each  interval  in  each 
route  is  represented  by  its  center  point  coordinates,  and  by  its  direction. 
If  an  aggressor  unit  enters  an  interval  along  its  associated  route,  then 
it  is  considered  to  be  positioned  in  the  center  of  the  interval,  generating 
a  possible  location  error  of  t   40  meters,  since  this  is  the  distance 
between  two  consecutive  intervals. 

c.  User-Defined  Routes 

The  user  is  required  to  input  the  original  location  of  each 
aggressor  unit,  and  the  locations  of  each  of  ten  nodes  he  desires  the 
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aggressor  unit  to  move  through  as  it  advances  on  the  defensive  unit' 3 
position.  This  information,  along  with  vehicle  speed,  is  used  to  calcu- 
late route  intervals  that  move  the  attacking  unit  through  each  of  the 
designated  nodes.  A  complete  route  would  look  like  that  depicted  in 
Figure  3-8.  The  method  used  to  complete  the  routes  is  as  follows. 

The  straight-line  ground  distance  between  the  first  two  adja- 
cent nodes  (DIST)  is  calculated  as  shown  in  Figure  3-8.  The  angle  between 
the  desired  direction  of  movement  and  a  straight  west-to-east  movement  (a) 
is  then  calculated.  Utilizing  these  quantities  and  the  distance  desi rea 
to  be  moved  during  each  time-step  (DST),  the  distance  to  be  moved  in  the 
X  and  Y  direction  (XLN  and  YLN)  is  now  computed  as  shown  in  Figure  3-9. 
These  distances  are  added  to  the  coordinates  of  the  previous  interval 
endpoint,  point  C  in  Figure  3-9,  to  determine  the  coordinates  of  the  next 
interval  endpoint,  point  D.  This  same  distance  is  again  added  to  compute 
the  coordinates  of  the  next  endpoint,  Point  E.  This  process  is  continued 
until  the  distance  from  the  last  endpoint  computed  to  the  next  node  is 
less  than  DST.  This  general  process  is  repeated  for  each  Dair  of  nodes 
until  the  entire  route  is  completed,  or  the  unit's  force  level  is  reduced 
to  zero  or  the  battle  terminated,  whichever  comes  first. 

To  insure  that  all  intervals  are  of  equal  length,  the  computa- 
tion of  the  first  interval  between  any  two  nodes  must  be  considered  separ- 
ately by  taking  into  account  the  distance  left  over  from  the  last 
computation  between  the  previous  two  nodes.  To  accomplish  this,  the 
first  interval  takes  the  remaining  distance  (e)  and  adds  it  to  an 
interval  length  (DST  -  e)  for  the  first  interval  between  any  two  nodes. 
This  insures  that  each  interval  along  the  route  is  of  length  DST,  which 

is  the  required  length. 
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Figure  3-8.  User  Determined  Routes 
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DIS' 


COORDINATES 
XIC(N-1),YIC<N-1) 
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(N+l)    Interval  Endpoint 

(N+2)nd  Interval  Endpoint 

User  Inputed  Mode 


(Y/XL) ,  where  Y  =  YL 


distance  less  than  DST  at  end  of  calculation 
of  intervals  between  adjacent  nodes. 


YLM  =  DST  x  SIN(a) 


XLM  =  DST  x  COS (a) 


Figure  3-9.  Route  Computation 
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3.  LOS,  Detection,  and  Fire  Allocation 
a.  LOS 

The  existence  of  a  line-of-sight  between  eny  two  opposing 
units  is  determined  utilizing  a  line-of-sight  model  written  and  program- 
med by  Professor  James  K.  Hartman,  Naval  Postgraduate  School  [Ref.  12], 
and  is  listed  as  Subroutine  LOS  in  the  land  combat  phe.se  of  the  model. 
Professor  Hartman 's  model  utilizes  a  parametric  terrain  model  proposed 
by  Needles  [Ref.  13],  which  represented  terrain  by   modeling  individual 
hill  masses.  Each  hill  is  described  by  a  bivariate  ncrmal  density  function, 
and  fitted  together  to  form  a  section  of  terrain  utilizing  the  following 
information  illustrated  in  Figure  3-10: 

1)  (Xc,Yc)  -  Coordinates  of  each  hill's  centerpoint 

2)  PEAK    -  Peak  height  of  each  hill 

3)  a      -  Standard  deviation  corresponding  to 

x        the  X-axis 

4)  a      -  Standard  deviation  corresponding  to 

y        the  Y-axis 

5)  (p)     -  Rotation  factor 

Once  the  terrain  has  been  "mapped",  the  existence  of  a  line- 
of-sight  can  be  determined  for  each  pair  of  opposing  units.  The  informa- 
tion required  to  accomplish  this  is  the  location  and  elevation  of  each 
unit,  as  well  as  the  height  of  the  vehicle  each  unit  uses.  Professor 
Hartman 's  model  yields  the  fraction  of  aggressing  Unit  A  as  seen  by 
defending  Unit  B,  and  the  fraction  of  defending  Unit  B  as  seen  by 
aggressing  Unit  A.  Figure  3-11  is  used  to  illustrate  this. 
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North 


Figure  3-10.     Terrain  Conceptualization 
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PORTION  OF  UNIT  A  THAT  IS  VISABLE  TO  UNIT  B 


U 


PORTION    OF   UNIT    B    THAT    IS    VISABLE   TO    UNIT    A 


Figure  3-11.     Partial   LOS  Conceptualization 
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b.  Acquisition 

The  acquisition  process  was  well-modeled  in  the  original  land 
combat  model  devised  by  Joseph  Smoler.  The  model  employs  the  concept  of 
parallel  acquisition,  whereby  the  weapon  system  continuously  searches  for 
targets,  even  while  engaging  other  targets.  When  such  a  weapon  system 
kills  its  presently  engaged  target,  it  immediately  can  shift  its  fire  to 
a  new  target,  provided  that  such  a  target  has  been  acquired  either  during 
the  engagement  of  the  previous  target  just  killed,  or  earlier  [Ref.  14]. 
A  general  description  of  the  manner  in  which  Smoler  modeled  target-acquisi- 
tion is  provided  here.  However,  a  more  detailed  description  is  provided 
in  his  thesis. 

The  probability  that  a  Unit  j  is  detected  by  a  Unit  i  at 
time  t+dt  was  modeled  for  four  different  combat  situations  in  which  the 
opposing  forces  might  find  themselves.  These  situations  can  be  summarized 
as  follows: 

Observer  Target 

Not  firing  (t,t+dt)  Not  firing  (t,t+dt) 

Not  firing  (t,t+dt)  Firing  (t,t+dt) 

Firing  (t,t+dt)  Not  firing  (t,t+dt) 

Firing  (t,t+dt)  Firing  (t,t+dt) 

The  formulas  derived  to  compute  the  probability  of  detection 
for  each  of  these  situations  have  a  number  of  common  variables,  therefore 
their  definitions  are  provided  beforehand  for  clarity: 

P..(t=dt)  =  The  probability  that  a  typical  firer  in  Unit 
1J         i  has  acquired  one  or  more  targets  of  type 
j  by  time  t+dt 
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Qtj(t+dt)  =  [1  -  P...(t+dt)] 
"  Aijdtsj(t) 


QV^Ct+dt)  =  e 

The  probability  that  target  j  is  not 
visually  detected  by  Unit  i  during 
(t,t+dt)  provided  Unit  j  does  not 
fire  during  this  time  interval 

where:      S.(t)  =  the  number  of  survivors 

in  Unit  j  at  time  t 

and:       x...    =  the  nonfiring  detection  rate 

of  one  target  in  Unit  j  by 
one  observer  in  Unit  j 

QP^Ct+dt)  =  (l  -  Pk)FRjdtsj(t) 

The  probability  that  target  j  is  not 
detected  by  a  launch  signature  during 
(t,t+dt)  provided  that  target  j  fires 
during  this  time  interval 


where:      P.   =  The  probability  that  one 

observer  in  Unit  i  is  look- 
ing in  a  direction  which 
enables  him  to  detect  target  j 

and:       FR .  =  The  firing  rate  of  one 
J    fi rer  in  Unit  j 


The  first  situation  occurs  when  neither  the  observer  nor  the 
target  is  firing  during  the  interval  (t,t+dt).  This  situation  allows  the 
observer  to  conduct  search  operations  only,  thereby  maximizing  the  prob- 
ability of  detecting  a  target  in  his  sector  of  responsibility,  and  has 
the  target  maximizing  his  probability  of  not  being  detected  by  exposure 
to  an  observer  by  a  launch  signature.  Thus,  the  probability  of  not 
detecting  in  time  interval  (t,t+dt)  is 


Q^.ft.t+dt)  =  Q.jtt)  x  QV.jU.dt) 
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The  second  situation  occurs  when  the  target  is  firing  during 
the  search  interval  (t,t+dt)  while  the  observer  is  conducting  only  search 
operations.  This  provides  the  observer  with  additional  information  to 
assist  in  detection  of  the  target.  The  observer  will  detect  the  target 
by  the  target's  launch  signature.  Thus,  the  probability  of  not  detect- 
ing in  time  interval  (t,t+dt)  is 

Q.^t.t+dt)  =  Q.d(t)  x  (QV^t.dt)  +QP.d(t,dt)  - 

QVij(t,dt)  x  QP...(t,dt)) 

The  third  situation  occurs  when  the  observer  is  firing  during 
the  search  interval  (t,t+dt)  while  the  target  is  maximizing  the  probabil- 
ity of  not  being  detected  by  not  firing  durinc;  the  interval.  The 
observer  has  lowered  detection  probability  by  diverting  a  portion  of 
his  force  to  firing  on  a  known  target.  A  new  factor  is  introduced 
which  will  alter  the  probability  of  detection.,  namely  the  event: 

A  =  The  situation  in  which  Unit  j  is  within  the 
field  of  view  of  Unit  ",  with  at  least  one 
of  the  targets  at  which  Unit  i  is  firing 

This  states  that  Unit  j,  which  is  not  currently  firing,  happens  to  expose 
itself  to  firing  Unit  i  when  firing  Unit  i  is  looking  and  firing  on  at 
least  one  other  target  in  j's  principal  direction.  Thus,  the  probability 
of  not  detecting  in  time  interval  (t,t+dt)  is 


Qi(j(t,dt) 


0 


if  event  A  occurs 


=  < 


g(n)    if  j  is  an_aggressor  unit 
and  event  A  occurs 

Q..(t)  if  j  is  a  defending  unit 
1J     and  event  A  occurs 
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where: 


and 


g(n)  is  an  increasing  function  of  n, 
where  n  is  the  number  of  time  intervals 
elapsed  since  time  t. 

g(o)  =  Q^-Ct) 


QiAt)   <  g(n)  4  1.0  for  all  n 

'  0 


The  fourth  situation  occurs  when  both  the  observer  and  target 
are  firing  during  the  interval  (t,t+dt).   In  this  situation  the  observer 
has  minimized  his  searching  capability,  and  the  target  has  maximized  its 
probability  of  being  detected.  Thus,  the  probability  of  not  detecting 
in  time  interval  (t,t+dt)  is 


(^..(t.t+dt) 


(      Q.,(t)  x  QV..(t,dt)  if  event  A  occurs 


=< 


9(n) 


Q--(t) 


if  j  is  an  aggresscr 
unit  and  event  A  occurs 

if  j  is  a  defender  unit 
and  event  A  occurs 


where: 


QV^.ft.dt) 


-  xTjdtsj(t) 


and: 


X*. 

U 


1J 


x  RF 


RF  =  Reduction  Factor  (the  detection  rate 
of  Unit  i  has  to  be  reduced  since  this 
unit  fires  during  (t,t+dt)  and  the 
search  for  targets  is  not  as  effective 
as  for  a  nonfiring  unit) 

SJ(t)  =S  (t)  x  (K=kPTTjK) 


pyj   =  proportion  of  Unit  i  allocated  to 
lK   Unit  K 


k  =  (Unit  K  is  engaged  by  Unit  i  and  Unit  j 
is  within  the  field  of  view  of  Unit  i 
while  observing  Unit  K) 
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If  a  line-of -sight  does  not  exist  between  observer  i  and 
target  j,  then  no  accumulation  of  detection  probability  will  take  place 
during  the  current  time  interval  (i.e.,  P..(t)  will  remain  the  same). 
However,  if  a  line-of-sight  does  not  exist  throughout  more  than  three 
consecutive  time  intervals,  then  the  P..  is  set  to  zero  (i.e.,  P..(t)  = 
0)  and  the  accumulation  process  will  start  again  from  zero  if  a  line-of- 
sight  is  acquired  at  a  later  point  in  the  battle.  The  motivation  for 
this  decision  rule  is  seen  by  the  observation  that  even  if  observer  i 
loses  a  line-of-sight  with  target  j  for  a  short  period  of  time,  he  still 
probably  has  some  idea  of  where  to  expect  the  target  to  reappear. 
c.  Non-Firing  Detection  Rate 

The  situations  that  occurred  when  the  target  was  in  a  non- 
firing  status  had  detection  probability  functions  that  had  as  a  para- 
meter X.  .,  a  non-firing  detection  rate.  The  manner  in  which  the  model 
derives  this  rate  is  quite  detailed,  and  deserves  attention. 

To  begin,  each  fi rer  in  an  observing  unit  is  assigned  a 
search  section  (or  sector  of  responsibility)  which  is  characterized  by 
two  parameters  (see  Figure  3-12).  These  parameters  are  the  section 
width  (ISECWD),  and  the  primary  direction  of  search  (IPRDIR).  Further- 
more, it  is  assumed  that  the  search  direction  within  a  section  of  search 
has  the  following  probability  density  function  known  as  the  LIMICQN 
Function: 

f(9)  =  A  +  B  cos  9   -D  4  9  iD 
where:  D  =  ISECWD/2 

A  =  -B  cos  D 

o  -       1 

D    2  (sin  D  -  D  cos  D) 
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Figure  3-12.  Search  Direction 
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Figure  3-13.  Observer-Target  Scheme 

(A  =  Observer,  B  =  Target) 
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0  corresponds  to  the  observer's 
primary  direction  of  search 


note:  A  and  B  are  chosen  such  that 


/  f(0)  d9  =  1 
"D 


To  determine  the  probability  that  observer  A  is  looking  in 
a  direction  which  enables  him  to  detect  target  B,  P.  is  the  value  of  the 
LIMICON  function  integrated  from  an  angular  value  up  to  15°  on  either  side 
of  the  primary  direction  of  fire,  specifically: 

ANGLFT 
Pk  ■  /      f(9)dQ  =  shaded  area,  Figure  3-13 
K   ANGRT 

I  ANGLE  +  15°  if  ANGLE  +  15°  <  D 
where:   ANGLFT  =  < 

D      if  ANGLE  +  15°  >  D 

and:   ANGLE  =  the  absolute  value  of  the  angle  between  the 
the  primary  direction  ( IPRDIR)  and  the  ob- 
server-target direction  (OTANG) 

ANGRT  =  ANGLE  -  15° 

Now,  given  that  observer  A  is  looking  in  a  direction  a  such 

that  ANGRT  =-  a  =    ANGLFT,  the  conditional  detection  rate  (x  ,  |  ANGRT  4  a 

ao 

i  ANGLFT)  is  determined  by  a  regression  curve  [Ref.  15]  which  is  a 

function  of  the  terrain,  target  horizontal  velocity,  and  the  equivalent 

range  for  a  full  height  target.  This  detection  rate  of  one  observer 
detecting  one  target  becomes 

1  .   =  (\.  I  ANGRT  4  a  i  ANGLFT)  x  P. 
A  ab      ab  k 
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d.  Fire  Allocation 

Three  conditions  are  necessary  for  Unit  j  to  be  classified 
as  a  target  for  Unit  i.  First,  a  1 ine-of -sight  must  exist  between  Unit 
i  and  Unit  j.  Second,  the  range  between  the  units  must  be  within  the 
maximum  range  of  Unit  i's  weapon  system.  Lastly,  the  probability  that 
a  detection  of  Unit  j  is  made  by  an  observer  in  Unit  i  in  the  time  period 
t+dt  must  be  greater  than  0.C0. 

Once  these  conditions  are  satisfied,  the  manner  in  which  fire 
is  allocated  to  a  target  depends  upon  how  many  targets  are  to  share  in 
the  firepower  of  Unit  i,  and  what  distance  exists  between  i  and  the 
new  target  in  relation  to  the  other  targets  under  fire.  The  priority  of 
fire  naturally  will  go  to  the  closest  target  since  it  is  of  a  greater 
threat  to  Unit  i  than  the  more  distant  targets.  The  amount  of  firepower 
available  from  Unit  i  is  naturally  a  function  of  the  percentage  of 
surviving  force  available  to  firs  in  Unit  i. 
4.  Attrition 

Attrition  of  forces  is  assessed  based  upon  variable  coefficient 
Lanchester  equations  of  modern  warfare  [Ref.  16].  This  method  of  attri- 
tion assessment  was  used  by  David  Chadwick  in  the  ship-to-shore  phase 
of  the  model,  however,  in  less  detail  than  was  modeled  by  Joseph  Smoler 
in  the  land  combat  phase  of  the  model.  The  "extra"  detail  provided  by 
Joseph  Smoler  is  the  generation  of  the  conditional  probability  of  a  kill 
given  a  hit.  This  probability  was  stated  by  Chadwick  as  a  user-supplied 
input  parameter. 

The  restriction  of  the  model  to  aimed-fire  weapons  systems  and 
homogeneous  forces  allows  for  the  attrition  of  forces  to  be  assessed 
using  variable  coefficient  Lanchester  equations  of  modern  warfare. 
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The  attrition  for  a  defending  Unit  j  is  described  by  the  following 
differential  equation: 


dSj(t) 


(Aij  x  PR0Pij)  x  Vt} 


dt 
where:  Sk(t)    =  The  number  of  survivors  in  Unit  k  at  time  t 


A..  =  The  rate  at  which  one  fire*-  of  Unit  i  kills 
Unit  j  targets  (attrition  rate  of  Unit  j  by 
one  fi rer  of  Unit  i) 

PR0Pkl   =  Proportion  of  Unit  k  allocated  to  fire 
against  a  Unit  1 


These  basic  differential  equations  of  force-on-force  attrition  were 
approximated  by  the  following  Euler-Cauchy  difference  equations: 

S.(t+dt)  =  Max(0,S.(t)  -  SA..(S.(t)  x  PR0P..)dt 

<J  '    J  -J  ' 

for  each  defending  Unit  i 


and 


S.(t+dt)  =  Max(0,s,(t)  -  zA.,(S.(t)  x  PR0P..)<Jt 
for  each  aggressor  Unit  j 


The  manner  in  which  the  attrition-rate  coefficient  A.,  is 
derived  stochastically  already  has  been  discussed  in  the  model 
enhancement  chapter,  therefore,  only  a  description  of  how  the  deter- 
ministic attrition-rate  coefficient  is  derived  will  be  mentioned  here, 

The  attrition-rate  coefficient,  A..,  for  each  equation  is 

computed  according  to  the  equation: 

1 


Aij  ■ 
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where:  T..  =  the  time  for  one  firer  of  Unit  1  to  kill 
one  target  of  Unit  j  under  the  conditions 
in  the  present  time  interval 

T...  is  computed  using  the  Bonder-Farrell  formula  [Ref.  17]: 

E[T  ]  =  ta  +  t]  +  ^-f!f  +  1  -P(Mh)  +  p(h|h)  „  p(h) 
J       '   P(k|h)      P(k|h) 

where:  t 

a     =  Time  to  acquire  a  target 

t-j     =  Time  to  fire  first  round  after  a 
target  is  acquired 

t^  =  Time  to  fire  a  round  following  a  hit 

tm  =  Time  to  fire  a  round  following  a  miss 

tf  =  Projectile's  time  of  flight 

P(h)  =  Probability  of  a  hit  on  first  round 

P(h|h)  =  Probability  of  a  hit  on  a  round  given 
that  the  prior  round  fired  was  a  hit 

P(h|m)  =  Probability  of  a  hit  on  a  round  given 
that  the  prior  round  fired  was  a  miss 

P(k | h)  =  Probability  of  a  hit  on  a  round  given 
that  the  round  fired  was  a  hit 

There  are  two  assumptions  of  the  Bonder-Farrell  formula  that  are 
implied  by  the  model.  The  first  assumption  is  that  fire  is  Markov- 
Dependent  in  that  the  probability  of  a  hit  of  any  round  depends  only 
upon  the  result  of  the  previous  round.  The  second  assumption  is  that  a 
Geometric  Distribution  describes  the  parameter  P(k|h)  in  that  accumulated 
damage  is  considered  to  be  negligible. 

The  expected  value  of  T..,  E[T..]»  may  now  be  expressed  for 
each  weapon  system  in  the  model.  It  is  assumed  that  for  the  TOW 
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weapon  system  P(k  h)  =  1.0,  and  P(h  m)  =  P(h  h)  =  P(h),  which  results 
in  the  reduced  formula: 

E[T1  J  -  t>  ♦  t,  ♦  «,  ♦  (t^VX°-P(h)) 
1J     a    1    f         p(h) 

If  the  firing  weapon  system  is  a  tank,  then  it  is  assumed  that  P(k|h)  =  1.0 
(due  to  a  lack  of  information),  and  that  tf  =  0.0  (due  to  the  velocity 
of  the  projectile).  Thus,  in  this  case  the  formula  becomes: 


ECT.j]  =  ta  +  t]  +  'm       x  (1  -  P(h)) 

P(h|m) 


It  should  be  noted  that  all  targets  were  considered  to  be  stationary 
throughout  the  attrition  process.  This  is  obvious  in  the  case  of  the 
stationary  defending  forces,  and  was  assumed  to  be  the  case  for  the 
aggressor  forces  due  to  the  fact  that  the  hit  probability  of  a  TOW 
against  a  moving  target  is  almost  the  same  as  for  a  stationary  target. 
5.  Battle  Termination 

Two  criteria  were  used  as  rules  governing  battle  termination. 
The  first  criterion  was  the  annihilation  (zero  force  level)  of  one  of 
the  two  forces.  The  second  criterion  was  that  the  distance  between 
defender  and  aggressor  forces  is  too  small. 

The  first  criterion  is  an  intuitively  obvious  reason  for  ter- 
minating the  battle,  and  thus  easy  to  model.  However,  although  the 
reasons  for  the  second  criterion  might  be  as  obvious,  the  modeling  of 
this  is  not  simple.  The  manner  in  which  Glenn  Mills  modeled  it  was  to 
compute  the  distance  between  each  attacking  sub-unit  on  which  casual- 
ties were  being  assessed  (i.e.,  still  alive),  and  each  defending 
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sub-unit  that  was  still  alive.  If  any  one  of  these  distances  between 
active  sub-units  was  too  close,  the  battle  was  considered  to  have 
reduced  to  close-in,  hand-to-hand  combat.  The  outcome  of  this  type 
of  combat  is  not  currently  provided  for  in  the  model,  and  for  this  reason 
the  battle  is  simply  terminated  at  this  point.  However,  to  insure  that 
the  aggressor  units  do  not  pass  by  the  flanks  of  the  remaining  defending 
forces  ard  remain  outside  termination  distance,  a  check  is  made  of  the 
location  coordinates  of  each  sub-unit.  If  any  aggressing  sub-unit's  X 
coordinate  places  the  unit  beyond  the  location  of  the  most  forward 
defending  sub-unit  still  in  the  battle,  the  battle  also  is  terminated. 

The  specification  of  the  distance  between  forces  for  battle 
termination  is  left  as  a  user-input,  which  provides  added  flexibility 
of  breakpoint  distance  analysis.  In  particular,  it  lends  itself  to  the 
study  of  optimum  breakpoint  distances  for  various  weapons  systems  on 
the  battlefield. 
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IV.   FUTURE  ENHANCEMENTS 

A  small -unit  amphibious  operation  combat  model  has  been  presented 
in  this  thesis  which  emphasizes  the  simplistic  and  avoids  the  abstract 
to  provide  an  understandable  and,  more  importantly,  a  useable  combat 
model  for  students  of  con.bat  modeling.  However,  the  combat  model  pre- 
sented has  the  potential  of  being  developed  into  a  much  more  refined 
model  which  could  be  studied  and  utilized  by  more  experienced  combat 
modelers.  Therefore,  several  enhancements  which  might  be  of  some  benefit 
to  the  more  experienced  modeler  are  mentioned  here  as  possible  approaches 
that  could  be  taken  in  refining  the  present  model. 

A.   HETEROGENEOUS  FORCES  IN  THE  LAND  COMBAT  PHASE 

The  current  land  combat  phase  of  the  model  involves  combat  between 
homogeneous  forces  only— that  is,  each  force  is  comprised  of  only  one 
weapon  system  type.  This  type  of  force  structure  was  intentionally 
modeled  to  maintain  a  relatively  simple  model  to  understand  and  work 
with.  However,  added  flexibility  could  be  attained  by  modeling  multiple 
weapons  system  types  for  each  of  the  opposing  forces.  This  would  allow 
the  user  to  analyze  the  effect  that  different  force  mixes  would  have  on 
battle  outcome. 

The  addition  of  different  weapons  system  types  within  a  single  unit 
would  require  extensive  restructuring  of  the  attrition  process  currently 
used  in  this  model.  Although  Lanchester  equations  still  could  be  uti- 
lized in  computing  direct-fire  weapon  system  attrition,  separate  Lan- 
chester equations  would  have  to  be  provided  for  each  weapon  system. 
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Furthermore,  with  the  addition  of  indirect-fire  weapon  systems  (i.e., 
artillery,  naval  gunfire,  and  close  air  support)  Lanchester  equations 
for  area-fire  would  have  to  be  implemented  for  each  area-fire  weapon 
system  type.  The  total  attrition  of  any  particular  unit  then  would 
be  the  summation  of  the  damage  assessed  by  each  weapons  system  type  on 
the  target  being  attrited. 

An  enhancement  of  this  type  would  result  in  more  realism  at  the 
cost  of  longer  execution  time,  and  a  more  complicated  attrition  process. 
Since  the  original  intent  of  the  thesis  was  to  provide  a  simple  model 
to  understand,  it  would  be  advisable  to  retain  a  copy  of  the  original 
model  prior  to  adding  this  enhancement.  Then  a  simple  model  would 
still  be  available  to  the  less  experienced  combat  modeling  students, 
while  a  more  detailed  model  would  provide  the  realism  that  more  exper- 
ienced modelers  would  demand. 

B.  LOGISTICAL  SUPPORT 

Logistical  support  is  one  of  the  most  overlooked  factors  of  combat 
in  the  development  of  combat  models.  The  influence  that  the  resupply 
of  fuel  and  ammunition  alone  have  on  the  outcome  of  a  battle  is  obvious 
and  deserves  attention. 

Ammunition  and  fuel  consumption  could  be  modeled  along  the  same 
lines  as  attrition  (i.e.,  through  the  use  of  expected  values  of  con- 
sumption). When  ammunition  or  fuel  on  hand  reaches  a  specified  critical 
level,  a  unit  could  be  restricted  in  movement,  or  experience  a  reduced 
level  of  fighting  effectiveness  and  maneuverability  (based  on  a  shortage 
of  ammunition  and  fuel)  until  resupply  of  the  critical  resource  could  be 
obtained. 
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The  amount  expended  of  these  resources  would  necessarily  be  a  function 
of  the  number  of  surviving  firers  in  the  unit,  the  number  of  vehicles 
available  to  transport  the  unit,  and  the  number  of  targets  engager,  by 
the  unit  at  any  one  time  interval.  The  expected  values  of  these  items 
then  could  be  used  in  computing  the  expected  rate  of  consumption  of 
ammunition  and  fuel.  Therefore,  the  overall  process  could  be  modeled  by 
initially  allocating  specific  levels  of  these  resources  (i.e.,  ammuni- 
tion and  fuel)  to  each  unit  at  the  commencement  of  the  battle,  and 
subtracting  the  expected  expenditure  of  the  ammunition  and  fuel  of  a 
particular  unit  based  upon  the  expected  number  of  survivors  firing  on 
engaged  targets,  and  the  distance  traveled  by  the  expected  number  of 
surviving  vehicles  of  the  unit. 

C.  GRAPHICAL  BATTLE  SUMMARY 

A  graphical  display  of  what  is  taking  place  on  the  battlefield  can 
be  worth  a  thousand  words  to  the  user  of  a  combat  model.  Plotting 
unit  locations  and  force  levels  on  a  display  of  the  actual  terrain 
fought  upon  would  eliminate  time-consuming  interpretation  of  these 
results  from  a  printed  battle  summary  report.  An  enhancement  of  this 
sort  would  serve  both  the  experienced  and  inexperienced  users  of  the 
model.  The  inexperienced  user  would  have  results  displayed  in  a  rrwch 
more  understandable  format,  while  the  experienced  user  would  be  able 
to  study  variant  combat  scenarios  with  much  less  effort  and  time 
expended. 
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V.   FINAL  REMARKS 

The  purpose  of  the  model  that  has  been  developed  is  to  illustrate 
a  number  of  underlying  concepts  of  combat  modeling  which  have  been 
addressed  in  this  study.  Therefore,  it  seems  appropriate  to  readdress 
these  concepts  to  allow  the  reader  to  reflect  upon  them  in  light  of 
what  has  just  been  presented. 

A.  INTEGRATING  INITIALLY  INDEPENDENT  COMBAT  MODELS 

The  model  developed  here  was  made  up  of  two  sub-models:  ship-to- 
shore  and  land  combat  models.  These  sub-models,  as  discussed  earlier, 
utilized  similar  combat  modeling  methodology  (i.e.,  Lanchester  equa- 
tions) in  computing  force  level  attrition.  However,  each  sub-model 
was  developed  by  different  individuals,  which  created  several  problems 
when  the  two  separate  sub-models  were  integrated  into  a  singular  con- 
tinuous flow  algorithm.  In  particular,  individualized  FORTRAN  coding 
techniques  and  documentation  of  state  variables  within  the  program 
structure  required  the  restructuring  of  major  portions  of  FORTRAN 
code  to  make  the  overall  combat  model  tractible  and  understandable. 
This  serves  to  illustrate  the  need  for  a  standardized  programming 
technique  to  be  applied  to  programming  of  combat  models,  and  high- 
lights the  need  for  proper  planning  and  coordination  in  development 
of  large  scale  combat  models  by  teams  of  combat  modelers. 

B.  THE  USER-ORIENTED  APPROACH  TO  COMBAT  MODELING 

This  thesis  illustrates  the  desirability  of  a  user-friendly 
approach  to  combat  modeling.  It  was  a  major  contention  of  the  thesis 
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that  this  approach  to  combat  modeling  has  not  been  closely  addressed 
by  combat  modelers  providing  combat  models  for  the  United  States  mili- 
tary. Furthermore,  it  was  mentioned  that  the  lack  of  concern  given 
;o  this  approach  of  combat  modeling  might  help  to  explain  the  lack  of 
enthusiasm  exhibited  by  the  United  States  military  in  utilizing  combat 
models  for  the  training  of  field  commanders  and  staffs.  The  thesis  had 
as  one  of  its  purposes,  the  presentation  of  a  combat  model  designed  to 
be  easily  understood  and  utilized  by  intended  users,  combat  modeling 
students.  Combat  models  should  be  designed  and  documented  with  the 
user's  capabilities  and  needs  in  mind,  as  opposed  to  those  of  the 
programmer. 

C.  A  COMBAT  MODEL  FOR  STUDENT  USE 

The  small-unit  amphibious  operation  combat  model  presented  here  is 
a  basic  Lanchester-type  combat  model  which  has  been  designed  with  a  low 
evel  of  complexity  in  order  that  it  might  be  understood  more  easily, 
and  studied  by  students  of  combat  modeling.  It  has  been  recognized 
l;hat  combat  modeling  students  may  have  little  or  no  experience  of  the 
governing  theory,  and  therefore  would  comprehend  the  theory  of  combat 
modeling  more  easily  by  utilizing  and  understanding  its  basic  application 
For  this  reason,  enhancements  that  would  increase  the  complexity  of  the 
model  are  discouraged,  and  enhancements  that  would  make  the  model  more 
understandable  (i.e.,  graphical  battle  summary  reports)  are  strongly 
encouraged. 
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I .   INTRODUCTION 

The  purpose  of  this  manual  is  to  familiarize  the  user  with  the  model, 
and  to  provide  administrative  information  (describing  how  the  potential 
user  would  access  and  run  the  model. 

The  small -unit  amphibious  operation  combat  model  is  a  two-phased 
combat  model  which  conducts  both  ship-to-snore  and  land  combat.  The 
model  uses  both  aimed  and  area-fire  Lanche;ter-type  equations  for 
casualty  assessment.  The  battle  is  initiated  by  an  amphibious  task 
force  positioned  25  miles  offshore  from  an  opposing  defensive  force 
which  is  illustrated  in  Figure  A-l .   If  an  amphibious  landing  is  success- 
ful, land  combat  will  be  conducted  inland  over  a  10  x  10  km  piece  of 
terrain  representing  an  area  east  of  Fulda,  West  Germany,  known  as  the 
Fulda  Gap,  which  is  depicted  in  Figure  A-2. 
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Figure  A-l .     LVA  Approach  Conceptualization 
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Figure  A-2.  Land  Combat  Terrain  Model 
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II.  AVAILABLE  OPTIONS 

The  model  has  been  developed  with  a  number  of  options  available  to 
the  user  to  provide  more  model  flexibility  for  the  more  experienced 
user.  Each  of  these  options,  including  user  responsibilities,  is 
discussed  here  with  the  input  requirements  for  each  being  outlined  in 
the  next  section. 

A.  STOCHASTIC  VS.  DETERMINISTIC  ATTRITION 

The  user  has  the  option  of  using  stochastic  or  deterministic  attri- 
tion computation.  Both  methods  utilize  Lanchester  aimed-fire  equations; 
the  difference  between  the  two  is  the  method  of  calculating  the  attrition- 
rate  coefficients  used  in  the  Lanchester  equations. 

Deterministic  attrition  can  be  thought  of  as  the  expected  value  of 
attrition,  and  is  implemented  by  using  the  Bonder-Farrell  method  of 
calculating  the  attrition-rate  coefficient,  A...  The  stochastic  method 
can  be  thought  of  as  the  randomization  of  attrition,  and  is  implemented 
by  using  random  deviates  from  a  Beta  Distribution  in  conjunction  with 
the  range  of  a  target  to  generate  individual  attrition-rate  coeffi- 
cients for  each  unit  at  each  time-step. 

B.  VARIANT  ATTACK  ROUTES 

The  user  has  the  option  of  providing  variant  aggressor  force  attack 
routes.  The  user  can  utilize  the  program's  straight  west-to-east  routes, 
or  can  input  desired  altered  routes  for  aggressor  force  units  to  follow. 
To  select  new  routes,  a  user  must  input  the  number  of  nodes  desired  on 
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each  of  three  routes,  and  the  coordinates  of  .each  of  these  nodes.  The 
program  then  will  compute  routes  through  each  node.  The  nodes  must  be 
inputad  in  order  from  west  to  east,  and  should  not  create  an  angle 
between  the  west-to-east  axis  and  the  route  direction  that  exceeds  45°. 

C.  ALTERNATE  DEFENSIVE  POSITIONS 

The  'jser  has  the  option  of  implementing  alternative  defensive  unit 
locations.  This  option  permits  the  user  to  add  more  realism  to  the 
model  by  allowing  the  defending  units  to  withdraw  to  alternate  positions 
when  their  primary  positions  become  untenable  (i.e.,  distance  between 
opposing  forces  is  too  close).  This  breakpoint  distance  is  determined 
and  inputed  by  the  user,  and  also  is  used  as  the  distance  for  battle 
termination  in  the  event  that  the  battle  reduces  to  close-in  combat  (i.e., 
hand-to-hand).  The  alternative  to  moving  the  defenders  is  to  terminate 
the  battle  wren  the  breakpoint  distance  is  initially  reached. 

D.  BATTLE  SLMMARY  PRINT-OUT 

The  user  has  the  option  of  limiting  the  printed  output  of  the  model. 
The  user  can  receive  a  battle  summary  print-out  at  the  completion  of 
each  10-second  time  interval,  or  this  information  can  be  suppressed, 
printing  out  the  results  only  after  each  phase  of  combat. 
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II 


REQUIRED  INPUT 


The  small-unit  amphibious  operation  combat  model  presented  in  this 
thesis  has  been  provided  with  a  blank  data  set  (see  Appendix  D)  which 
includes  each  variable  of  the  model  requiring  input  provided  by  the 
user,  and  space  available  following  each  variable  for  the  user  to  place 
the  desired  variable  value.  However,  the  definition  of  each  input 
variable  may  not  be  familiar  to  the  first-time  user  of  the  program. 
Therefore,  the  following  list  of  input  variables  and  their  definitions 
is  provided  as  a  quick  reference  for  the  user  of  the  model. 


Ship-to-Shore  Phase 


Input  Variable 
IPRINT 


SPDMAX 

SPDMIN 

HTMAX 

HTMIN 

WIDTH 

TENGMX 

SENGMX 

SENGMN 

TARTM 

SARTM 


Definition 


User  option  for  selecting  type  of  battle 
summary  report  desired: 

0  -  Each  Time-Step 

1  -  End  of  Battle 

Maximum  speed  of  LVA  in  the  water. 

Min-mum  speed  of  LVA  in  the  water. 

Height  of  LVA  above  water  at  maximum  speed. 

Height  of  LVA  above  water  at  minimum  speed, 

Width  of  an  LVA. 

Tank  maximum  engagement  range. 

ATGM  maximum  engagement  range. 

ATGM  minimum  engagement  range. 

Tank  aim-reload  time. 

ATGM  aim-reload  time. 
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Input  Variable 

TVEL 

SVEL 

TSIGV 

TSIGH 

TMEANH 

SSIGV 

DEFWTS 

WVINT(i) 

DINIT(i) 

A(i) 
B(i) 
WB(i) 

GAINL 

GAMMA 
DELTA 


Definition 

Tank  projectile  velocity. 

ATGM  projectile  velocity. 

Standard  deviation  error  in  the  vertical 
axis  for  Tank  fire. 

Standard  deviation  error  in  the  horizontal 
axis  for  Tank  fire. 

Bias  error  in  the  horizontal  axis  for  Tank 
fire. 

Standard  deviation  error  in  the  vertical 
axis  for  ATGM  fire. 

Defensive  force  tactical  allocation  weights 

Initial  strength  of  assault  wave  I. 

Initial  strength  of  defensive  Tank  (1=1) 
and  ATGM  (1=2)  units. 

Aggressor  force  attrition  coefficients. 

Defensive  force  attrition  coefficients. 

Aimed-fire  attrition-rate  coefficients 
for  defensive  force  Tank  and  ATGM  units. 

Defensive  force  attrition  level  at  which 
remaining  defending  forces  withdraw  and 
ground  assault  commences. 

Aim-reload  time  suppression  factor. 

Aiming  error  caused  by  the  suppression 
factor  of  ATFFS 


The  remaining  portion  of  the  input  data  refers  to  the  terrain  model 
developed  by  Professor  James  Hartman.  It  is  suggested  that  this  portion 
of  the  data  set  not  be  altered  until  the  user  has  studied  and  fully  under- 
stands the  Hartman  terrain  model. 
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Land  Combat  Phase 


Variable 


ITRIT* 


DSEED** 


PP  -  QQ 
PD  -  QD 


NBU 
NRU 
RMINTK 

RMAXTK 

RMINTW 

RMAXTW 

IRTE 


ISPD 


XIC(M),  YIC(5,i) 


N(T) 


Definition 

Input  variable  denoting  whether  attrition 
will  be  stochastic  or  deterministic: 

0  -  Stochastic 

1  -  Deterministic 

Double  precision  seed  used  in  the  Beta 
Distribution  Random  Deviate  Generator. 

Input  parameters  for  the  Beta  Distribu- 
tion Random  Deviate  Generator: 

PP-QQ  Aggressor  force 

PD-QD  Defensive  force 

Number  of  defensive  units. 

Number  of  aggressor  units. 

Minimum  effective  range  of  an  LVA  weapon 
system. 

Maximum  effective  range  of  an  LVA  weapon 
system. 

Minimum  effective  range  of  a  defensive 
TOW  weapon  system. 

Maximum  effective  range  of  a  defensive 
TOW  weapon  system. 

User  option  for  selecting  type  of  aggressor 
force  attack  routes: 

0  -  Program  determined 

1  -  User  determined 

Speed  of  aggressor  force  units: 
1  -  9  MPH 
2-12  " 
3-15  " 
4-18  " 

Coordinates  of  the  j   interval  endpoint 
of  the  route  for  Unit  i. 

Number  of  nodes  for  aggressor  route  i. 


Note:  *There  are  two  ITRIT  variables  in  the  data  set.  The  first  ITRIT 
refers  to  the  aggressor  forces. 

**There  are  two  DSEED  variables  in  the  data  set.  The  first  DSEED 
refers  to  the  aggressor  forces. 
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Variable  Definition 

XL0C(i ,j),YL0C(i,j)  Coordinates  of  node  i  for  aggressor  route  i 

X(5),Y(I)  Location  of  defensive  Unit  i. 

FL(j)  Force  level  of  a  defensive  Unit  i. 

IPRDIR(i)  Principal  direction  of  fire  of  defensive 

Unit  i. 

IALT  User  option  for  selecting  alternate 

defensive  positions: 

0  -  Yes 

1  -  No 

BREAK  Breakpoint  distance  between  aggressor 

units  and  defensive  units. 

ITEM  Input  variable  denoting  number  of  time- 

steps  allowed  for  aggressor  unit  moves. 

XA(i),YA(i)  Coordinates  of  alternate  position  for 

defensive  Unit  i . 

P(i,j)  Probability  of  first  round  hit  by  Unit  i 

in  range  band  j. 

PHH(i,j)  Probability  of  a  hit  following  a  hit  by 

Unit  i  in  range  band  j. 

PHM(iJ)  Probability  of  a  hit  following  a  miss  by 

Unit  i  in  range  band  j. 

PKH(i,j)  Probability  of  a  kill  given  a  hit  by 

Unit  i  in  range  band  j. 
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IV.  EXPECTED  OUTPUT 

The  small-unit  amphibious  operation  combat  model's  output  is 
designed  to  be  self-explanatory.  Each  phase  of  the  amphibious  opera- 
tion is  reported  in  the  output  of  the  model.  The  output  format  for 
each  phase  will  include  an  initial  information  section  to  provide  the 
user  with  feedback  concerning  the  operation  of  the  model  as  read-in 
by  the  model  from  the  user-supplied  input  data.  This  serves  as  a  check 
and  a  record  for  the  user  to  insure  that  the  model  was  run  according  to 
the  intended  design  of  the  user.  Secondly,  battle  summary  reports  are 
provided  at  specific  points  of  the  battle  depending  upon  the  desires 
of  the  user  as  input  by  the  user  option  variable  IPRINT.  An  example 
of  the  model's  output  is  displayed  in  Appendix  F. 
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V.  ACCESSING  AND  EXECUTING  THE  MODEL 

The  prospective  user  who  wishes  to  study  the  small-unit  amphibious 
operation  combat  model  must  first  contact  Professor  James  Taylor  of  the 
Operations  Research  Department  and  obtain  the  user  identification 
number  and  password  for  the  disk  space  containing  the  model  and  its 
support  programs. 

A.  ACCESSING  THE  MODEL 

Once  the  required  information  is  obtained,  the  user  should  proceed 
to  LOG  ON  to  his  OWN  disk  space  entering  the  CMS  mode  of  operation. 
Upon  entering  CMS,  the  following  commands  should  be  executed: 

LINK  TO  (USER  ID*)  191  AS  192  RR 

PASSWORD 

ACCESS  192  B/A 

COPY FILE  AMPHIB  FORTRAN  B  =  =  A 

COPYFILE  SEA  DATA  B  =  =  A 

COPY FILE  LAND  DATA  B  =  =  A 

COPYFILE  3SEA  DATA  B  =  =  A 

COPYFILE  BLAND  DATA  B  =  =  A 

COPYFILE  WAR  EXEC  B  =  =  A 

RELEASE  192  (DET 


*Note:  USER  ID  refers  to  the  user  id  provided  by  Professor  Taylor, 
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What  is  received  on  the  user's  disk  is  a  copy  of  the  following  files: 

1.  The  Small-Unit  Amphibious  Operation  Combat  Model  (APPENDIX  B) 

2.  A  complete  data  set:  SEA  and  LAND  (APPENDIX  C). 

3.  A  blank  data  set:  BSEA  and  BLAND  (APPENDIX  D). 

4.  The  model's  executive  program:  WAR  (APPENDIX  E). 

B.  EXECUTING  THE  MODEL 

To  execute  the  model  utilizing  the  data  se"  provided,  the  user  must 
first  compile  the  FORTRAN  program,  AMPHIB,  by  entering  the  following 
commands: 

DEF  STOR  1M 
I  CMS 

FORTGI  AMPHIB 
Once  the  program  is  compiled,  the  user  enters  the  name  of  the 
executive  file  WAR,  which  then  executes  the  program  and  displays  the 
listing  file  of  output  from  the  model,  (i.e.,  AMPHIB!  LISTING  (APPENDIX 
F))  in  the  BROWSE  mode  of  XEDIT. 

C.  ALTERING  THE  DATA  SET 

The  user  may  desire  to  invoke  one  of  the  available  options  provided, 
or  alter  specific  elements  of  the  existing  data  set  to  "play  out"  various 
combat  scenarios.  To  alter  the  existing  data  set,  the  user  first  decides 
whether  to  alter  the  ship-to-shore  phase  of  combat,  or  the  land  combat 
phase.  Once  this  has  been  established,  the  user  can  simply  XEDIT  the 
appropriate  data  file,  replacing  the  old  input  data  with  the  new  input 
data. 

To  construct  an  entirely  new  data  set,  the  user  should  make  use  of 
the  blank  formatted  data  set  provided.  The  user  simply  XEDIT ' s  the 
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BSEA  or  BLAND  data  files,  inputting  new  data  by  typing  oyer   the  spaces 
provided.  The  variable  names  are  listed  in  both  of  the  data  sets,  as 
well  as  in  Chapter  III  of  this  user's  manual.  The  space  provided  in 
the  blank  data  sets  is  designed  to  be  compatible  with  the  READ  format 
statements  of  the  program. 

D.   EXECUTING  THE  MODEL  AFTER  ALTERING  DATA 

If  the  user  has  just  altered  specific  elements  of  the  data  set  pro- 
vided without  altering  file  names,  the  user  will  once  again  enter  the 
name  of  the  executive  file  WAR,  and  enter  the  new  data  set  file  naires 
where  appropriate.  Once  this  editing  of  the  executive  file  has  been 
accomplished,  the  user  simply  enters  the  executive  file  name  WAR  tc 
execute  the  model  again. 
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VI.  PROGRAM  STRUCTURE 

The  small -unit  amphibious  operation  combat  model  is  a  computerized 
model  written  in  FORTRAN.  It  consists  of  a  main  program  and  19  sub- 
routines. To  assist  the  user  in  understanding  the  operation  of  the 
model,  a  brief  description  of  the  function  of  each  subroutine,  as  well 
as  the  functioning  of  the  main  program,  is  provided. 

A.  MAIN  PROGRAM 

The  main  program  serves  as  a  director  program  for  the  model.   It  calls 
for  the  initialization  of  data  for  the  ship-to-shore  phase  of  combat,  and 
then  commences  the  execution  of  that  phase  of  combat.  The  results  of 
the  ship-to-shore  phase  of  combat  as  provided  by  subroutine  SEA  are 
then  reviewed  to  determine  if  the  land  combat  phase  of  combat  should 
begin,  or  if  the  battle  should  be  terminated.  If  the  results  warrant 
a  continuation  of  the  battle,  the  reason  for  continuation  is  printed 
and  land  combat  is  initiated. 

B.  SUBROUTINES 

There  are  19  subroutines  in  the  model.  The  function  of  each  has 
been  provided  at  the  beginning  of  each  subroutine  in  the  coded  program, 
and  also  is  presented  here  for  clarity. 

1 .  Subroutine  SEA 

This  subroutine  is  the  main  driver  program  for  the  ship-to-shore 

phase  of  the  amphibious  operation.  Its  main  purpose  is  to  initialize 

key  parameters,  and  to  direct  program  flow  in  the  ship-to-shore  phase 

of  combat. 
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2.  Subroutine  RKINT 

This  subroutine  provides  the  interface  between  the  EULER  numerical 
integration  routine  (RKLDEG)  and  the  subroutine  ATTR  which  determines 
each  unit's  status  as  time  progresses  throughout  the  amphibious  operation. 

3.  Subroutine  ATTR 

This  subroutine  determines  the  attrition  rates  and  updates  the 
status  of  each  unit  with  respect  to  shore  movement  based  upon  the  given 
state  variable  strengths,  and  implements  this  information  into  the  attri- 
tion loss-rate  computation. 

4.  Subroutine  DTGTS 

This  subroutine  determines  the  wave  numbers  that  are  to  be  engaged 
by  the  defensive  Tank  and  ATGM  units,  based  upon  the  engagement  window 
criteria  and  LVA  wave  survivor  force  levels. 

5.  Subroutine  DATAIN 

This  subroutine  reads  in  all  user-supplied  information  required 
by  the  ship-to-shore  phase  of  the  model. 

6.  Subroutine  OUTPUT 

This  subroutine  provides  an  input  summary  printout  based  upon 
the  data  received  by  subroutine  DATAIN.  A  printout  of  dispersion  data 
generated  as  a  result  of  data  supplied  also  is  provided. 

7.  Subroutine  PHIT 

This  subroutine  computes  the  probability  of  a  hit  based  upon 
the  range,  width,  and  height  of  a  given  target.  The  type  of  weapon 
being  employed  against  the  target  then  is  taken  into  consideration  for 
computing  the  specific  probability  of  a  hit. 
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8.  Subroutine  INTRP 

This  subroutine  is  a  check  to  insure  that  the  range  of  a  target 
and  the  dispersion  data  are  compatible  for  confuting  the  probability  of 
a  hit  in  subroutine  PHIT. 

9.  Subroutine  RATE 

Given  the  range  and  speed  of  a  target,  along  with  the  type  of 
weapon  being  used  to  fire  upon  the  target,  and  the  suppression  factor 
the  firer  is  being  subjected  to,  subroutine  RATE  computes  the  rate  of 
fire  used  against  a  particular  target. 

10.  This  is  the  primary  subroutine  of  the  land  combat  phase  of  the 
amphibious  operation.  Information  required  for  the  operation  of  the 
land  combat  phase  is  read- in  and  printed  in  a  summary  table  for  user 
review.  The  information  provided  by  all  other  subroutines  used  in  the 
land  combat  phase  is  used  in  this  subroutine  as  input  to  the  basic  land 
combat  algorithm. 

11.  Subroutine  SETUP 

This  subroutine  is  used  to  read-in  the  terrain  data  and  create 
parametric  terrain.  The  terrain  data  will  be  used  when  computing 
line-of-sight  between  targets  and  observers,  as  well  as  providing  a 
grid  system  for  unit  locations  and  movement. 

12.  Subroutine  ROUTE 

This  subroutine  computes  the  route  of  each  aggressor  unit  when 
the  user  has  selected  the  option  of  inputting  aggressor  routes.  It 
calculates  the  coordinates  of  each  interval  endpoint  along  the  route, 
making  each  interval  length  (distance  moved  during  a  ten-second  time- 
step)  the  same.  The  interval  length  is  determined  by  the  speed  the  user 
has  selected  and  inputted  for  the  current  battle. 
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13.  Subroutine  LAMBDA 

This  subroutine  used  in  conjunction  with  the  line-of-sight 
routine  computes  the  detection  rate  (DETRAC)  of  target  j  by  the  observer 
i,  given  the  percent  of  target  visible  (PCTVIS)  to  the  observer. 

14.  Subroutine  ELEV 

This  subroutine  determines  the  terrain  elevation  for  a  given 
set  of  X,  Y  coordinates.  This  function  is  used  in  conjunction  with  the 
line-of-sight  subroutine  in  computing  a  line-of-sight  between  ooserver 
and  target. 

15.  Subroutine  STOCH 

This  subroutine  determines  the  attrition  coefficients  when  a 
user  has  selected  a  stochastic  attrition  option.  The  calculation  is 
a  function  of  the  original  stochastically  determined  attrition  coeffi- 
cient, as  well  as  a  function  of  range. 

16.  Subroutine  ETK 

This  subroutine  computes  the  expected  time  for  a  given  firer 
to  kill  a  given  target.  The  calculation  is  a  function  of  range,  time 
of  flight  for  a  round,  and  hit  and  kill  probabilities  for  the  firing 
weapon  system.  It  is  a  number  that  is  used  in  computation  of  the 
deterministic  attrition  coefficients. 

17.  Subroutine  SORT 

This  subroutine  is  used  to  sort  targets  in  ascending  range 
order.  This  is  used  to  determine  the  priority  of  a  target  for  fire 
allocation. 

18.  Subroutine  KOVER 

This  subroutine  determines  what  portion  of  a  particular  target 
is  covered  by  the  terrain  between  the  target  and  observer. 

88 


This  number  is  used  both  in  the  detection  of  the  target,  and  in  the 
attrition  computation. 
19.  Subroutine  LOS 

This  subroutine  was  written  by  Professor  James  Hartman,  Naval 
Postgraduate  School.  It  computes  a  percent  of  a  target  visible  to  a 
particular  observer,  given  the  location  coordinates  of  both. 
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VII.   DEFINITION  OF  VARIABLES  IN  COMPUTER  PROGRAM 


A.  VARIABLES  USED  IN  THE  SHIP-TO-SHORE  PHASE 


A(i) 
ATFFS 
B(i) 
CDSURV(i) 

CSURVE(i) 
DA(i) 

DEFWTS 
DELTA 

DINIT(i) 
DS1 

DS2 


DTI 


DT2 


DT1PH 


Aggressor  force  attrition  coefficients. 
Amphibious  Task  Force  Fire  Support. 
Defensive  force  attrition  coefficients. 

Current  strength  of  defensive  Unit  i: 

1  -  Tank  ' 

2  -  ATGM 

Current  strength  of  assault  wave  i. 

Attrition  rate  for  defensive  Unit  i  due  to 
the  effects  of  ATFFS/TLF. 

Defensive  Force  Tactical  Allocation  Weights. 

Aiming  error  caused  by  the  suppression  factor 
of  ATFFS. 

Initial  strength  of  defensive  Unit  i. 

That  portion  of  the  defensive  force  ATGM 
unit  assigned  to  engaging  the  closer  of  two 
multiple  waves  in  the  ATGM  engagement  window. 

That  portion  of  the  defensive  force  ATGM 
unit  assigned  to  engaging  the  farther  of 
two  multiple  waves  in  the  ATGM  engagement 
window. 

That  portion  of  the  defensive  force  Tank 
unit  assigned  to  engaging  the  closer  of  two 
multiple  waves  in  the  Tank  engagement  window. 

That  portion  of  the  defensive  force  Tank 
unit  assigned  to  engaging  the  farther  of 
two  multiple  waves  in  the  Tank  engagement 
window. 

Hit  probability  of  rounds  fired  by  DTI  against 
the  assault  wave  in  its  engagement  window. 
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DT1R0F 
GAINL 

GALF 


GAMMA 
GATK 


GATM 
IL(i ) 

IPRINT 


:wp?! 


IWSTAT(i) 


RD 

RKSURV(i) 
SA(i) 

SARTM 
SENG(i) 


Rate  of  fire  utilized  by  DTI  against  the 
assault  wave  in  its  engagement  window. 

Defender  attrition  level  at  which  remaining 
defending  forces  withdraw  and  land  combat 
commences. 

Denotes  whether  the  landing  force  buildup 
is  sufficient  for  land  combat: 

0  -  Insufficient 

1  -  Sufficient 

Aim-reload  time  suppression  factor. 

Denotes  whether  the  landing  force  has 
initiated  the  land  combat: 

0  -  Not  started  yet, 

1  -  Started  already. 

Time  at  which  land  combat  commenced. 

Denotes  if  wave  i  has  reached  the  shore: 

0  -  Wave  i  not  ashore, 

1  -  Wave  i  ashore. 

Denotes  whether  the  user  desires  battle 
summary  at  each  time-step,  or  just  a 
final  summary: 

0  -  Battle  summary  printed  after  each 

time-step, 

1  -  Final  battle  summary  only. 

Weapon-type  code:  Tank  =  1,  ATGM  =  2. 

Current  status  of  assault  wave  i: 

0  -  Not  engaged, 

1  -  Landed, 

2  -  Under  fire  by  ATGM, 

3  -  Under  fire  by  Tank, 

4  -  Under  fire  by  both  ATGM  and  Tank. 

Distance  offshore  at  which  waves  initiate 
their  transition. 

Concatenation  of  CSURV  and  CDSURV. 

Attrition  rate  for  wave  i  due  to  ATGM. 

ATGM  aim-reload  time. 

Wave  number  of  the  closer  of  two  assault 
waves  in  the  ATGM  engagement  window. 
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SENGMN 
SENGMX 
SRNG(i) 
SSIGH 

SSIGV 

SVEL 
SWTS(i) 

TA 

TA(i) 

TARTM 
TB 

TBW 

TFF 
TENG(i) 

TENGMX 
TMEANH 

TMEANV 

TRNG(i) 
TSIGH 

TSIGV 


ATGM  minimum  engagement  range. 

ATGM  maximum  engagement  range. 

Firing  range  to  wave  SENG(i). 

The  standard  deviation  error  in  the 
horizontal  axis  for  ATGM  fire. 

The  standard  deviation  error  in  the 
vertical  axis  for  ATGM  fire. 

ATGM  projectile  velocity. 

The  proportion  of  the  total  defensive 
force  ATGM  strength  to  be  allowed  to 
engage  wave  SENG(i ). 

Time  first  assault  wave  initiates  its 
transition. 

Attrition  rate  for  assault  wave  i  due 
to  Tank  fire. 

Tank  aim-reload  time. 

Time  first  assault  wave  completes  its 
transition. 

The  interarrival  time  between  waves 
arriving  at  the  beach. 

Time  first  assault  wave  reaches  the  beach 

Wave  number  of  the  closer  of  two  assault 
waves  in  the  Tank  engagement  window. 

Tank  maximum  engagement  range. 

The  bias  error  in  the  horizontal  axis 
for  Tank  fire. 

The  bias  error  in  the  vertical  axis 
for  Tank  fire. 

The  firing  range  to  assault  wave  TENG(i). 

The  standard  deviation  error  in  the 
horizontal  axis  for  Tank  fire. 

The  standard  deviation  error  in  the 
vertical  axis  for  Tank  fire. 
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TSURV 

TVEL 
TWTS(i) 

WB(i) 

WID 

WVINT(i) 
WVRNG 


Total  number  of  surviving  LVA  ashore  at 
the  current  time. 

Tank  projectile  velocity. 

The  proportion  of  the  total  defensive 
force  Tank  strength  to  be  allowed  to 
engage  wave  TENG(i) . 

Aimed-fire  attrition-rate  coefficients 
for  defensive  force  Tank  and  ATGM  assets 

Width  of  LVA. 

Initial  strength  of  assault  wave  i. 

Firing  range  to  assault  wave  i. 


B.  VARIABLE  USED  IN  THE  LAND  COMBAT  PHASE 

ALPHA(i)      Initial  attrition-rate  coefficient  for 
stochastic  attrition  option. 

ANGH(i)  Orientation  angle  of  the  hill  ellipse 
measured  in  degrees  counter-clockwise 
from  East  to  the  major  axis. 

AP0A(i,j)     The  average  proportion  of  the  j   attacker 
of  Unit  i  allocated  to  fire  on  Unit  i. 

AVD  Average  distance. 

AVSP         Average  speed  of  moving  aggressor  units. 

BASE         Overall  terrain  elevation  above  sea  level. 

BREAK        Breakpoint  distance  between  aggressor  units 
and  defensive  units. 

DISMAX        Maximum  distance  allowed  between  aggressor 
units  before  the  leading  unit  is  delayed. 

DIST         The  straight-line  distance  between  two 
movement  nodes  input  by  the  user. 

DST  The  distance  in  meters  to  be  moved  each 

time-step  by  aggressor  units. 

ECC(i)        The  eccentricity  defined  as  the  ratio  of 
major  axis  length  to  minor  axis  length. 
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FLO) 

F0(i) 
IALT 


IC 
IDIR 

ii(0 

IITIME 
I  MAX 
IMOVE 

IPRDIR(i) 

IRAN 
IRTE 


ISE 

ISECWD(i) 
ISPD 


IT 

ITE 

ITEM 


Force  level  of  Unit  i . 

Initial  force  level  of  Unit  i. 

Denotes  whether  the  user  desires  alternate 
defensive  positions  or  not: 

0  -  Yes, 

1  -  No. 

Counts  number  of  time  units  a  defender 
has  been  moving. 

Direction  of  j   interval  in  1   route. 

Interval  index  for  Unit  i. 

Current  time. 

Maximum  number  of  time  intervals  allowed. 

Number  of  time  units  a  defender  is  allowed 
for  moving  to  an  alternate  position. 

Primary  direction  of  fire  for  defensive 
Unit  i. 

Range. 

Denotes  whether  user  wants  to  input  routes 
or  not: 

0  -  Program  determined  routes, 

1  -  User  determined  routes. 

A  switch  variable  set  to  1  when  the  defen- 
sive force  ATGM  unit  initiates  its  fire. 

Width  of  search  sector  for  defensive  Unix:  i 

Input  variable  to  denote  user's  desired 
speed  for  aggressor  force  movement: 

1  -  9  MPH, 

2-12  MPH, 

3-15  MPH, 

4  -  18  MPH. 

Current  time  period. 

A  switch  variable  set  to  1  when  the  defen- 
sive force  Tank  unit  initiates  its  fire. 

Input  variable  denoting  number  of  time- 
steps  allowed  for  aggressor  unit  move. 
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ITIME 
ITRIT 


IUSTAT(i) 


LVAFR 
LATOB 


LISTH(i) 
LOA(i,j) 
LOST(i,j) 

LOT(i.j) 

LST 

MVTDIR(i) 
N(i) 

NA(i) 
NBU 

NCVELS 
NF(i) 

NHL(i.j) 
NHILLS 

NHTOT 


Current  time,  in  seconds,  of  battle. 

Input  variable  denoting  whether  attrition 
will  be  stochastic  or  deterministic: 

0  -  Stochastic, 

1  -  Deterministic. 

Current  status  of  Unit  i: 

0  -  Alive,  not  firing, 

1  -  Alive  and  firing, 

2  -  Killed, 

3  -  Moving. 

Firing  rate  for  LVA  weapon  system. 

Indicator  variable  for  one-  or  two-way 
LOS  calls: 

0  -  Do  not  compute  LOS  from  Unit  A 

to  Unit  B, 

1  -  Compute  LOS  from  Unit  A  to  Unit  B. 

List  of  hill  numbers  for  each  grid  square. 

The  number  of  the  j   target  of  Unit  i. 

Denotes  whether  1 ine-of-sight  exists 
between  Unit  i  and  Unit  j. 

J.  L. 

The  number  of  the  j   target  of  Unit  i. 

Index  number  for  the  first  hill  listed 
for  grid  square  (i,j)  in  LISTH(i). 

Movement  direction  of  Unit  i. 

Number  of  nodes  inputted  by  user  for 
route  i . 

Number  of  aggressors  of  Unit  i. 

Number  of  defensive  force  units. 

Number  of  forest  ellipses  in  terrain. 

Number  of  time  units  a  Unit  i  is  allowed 
to  fire  at  the  same  location. 

Number  of  hills  in  each  grid  square  (i,j). 

Number  of  different  hills  to  be  modeled. 

Total  number  of  hills  modeled  on  battlefield, 
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NLOSC(i,j) 

NOD 

NOI(i) 

NRU 

M(i) 

CFL(i) 

P(1.J) 

PHH(i.j) 

PHM(i,j) 

FKH(i.j) 

FM 

POA(i.j) 

FOL(i) 

FTT(i) 

RANGE 

RKATTR 

RF 


RMINTK 


Number  of  continuous  time-steps  that  LOS 
does  not  exist  between  Unit  i  and  Unit  j. 

Number  of  time  intervals  Unit  i  delayed 
in  movement. 

f  h 

Number  of  intervals  in  the  i   route. 

Number  of  aggressor  force  units. 

Number  of  targets  of  Unit  i. 

Force  level  of  Unit  i  during  previous 
time-step. 

Probability  of  first  round  hit  by  Unit  i 
in  range  band  j. 

Probability  of  a  hit  following  a  hit  by 
Unit  i  in  range  band  j. 

Probability  of  a  hit  following  a  miss  by 
Unit  i  in  range  band  j. 

Probability  of  a  kill  given  a  hit  by 
Unit  i  in  range  band  j. 

The  proportion  of  time  a  moving  unit  is 
searching  for  targets. 

+■  h 

The  proportion  of  the  j   attacker  of 
Unit  i  allocated  to  fire  on  Unit  i. 

Percent  of  Unit  i  lost  during  the  current 
time-step. 

Proportion  of  surviving  firepower  allocated 
to  the  i   target  if  there  are  j  targets 
available  to  be  engaged. 

Current  minimum  distance  between  aggressors 
and  defenders. 

Vector  containing  the  current  attrition 
loss  rates  to  be  applied  within  the 
Euler  integration  routine. 

Detection  rate  reduction  factor  for  a 
firing  unit  (in  comparison  to  a  non- 
firing  unit) . 

Minimum  effective  range  for  an  LVA 
mounted  weapon  system. 
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RMINTW 


Minimum  effective  range  for  a  TOW  weapon  system, 


RMXTK 

RMXTW 

ROF 

ROT(i.j) 

SIZETK 
SIZETW 

SPRD(i) 


SUMBO 
SUMRO 
SUPFAC 
TA(k) 

TFl(k) 

TF2(k) 
TF3(k) 

TH(k) 

TI(k) 

TM(k) 

TMACI.TMACJ 
TOWFR 


Maximurr  effective  range  for  an  LVA  mounted 
weapon  system. 

Maximum  effective  range  for  a  TOW  weapon  system, 

Rate  of  fire. 

+■  h 

Range  of  the  j   target  of  Unit  i. 

Size  of  LVA  weapon  system. 

Size  of  TOW  weapon  system. 

Measure  of  hill  size  which  is  defined  to 
be  the  distance  in  meters  measured  along 
t'ie  major  axis  from  hill  center  to  the 
contour  line  which  is  50  meters  dcwn  from 
the  peak. 

Total  defensive  force  level. 

Total  aggressor  force  level. 

Suppression  factor. 

Time  tc  acquire  a  target  for  k   weapon 
system  type  (k  =  1  ,  2) . 

+■  h 

Time  of  flight  to  1000m  for  k   weapon 
system  type  (k  =  1  ,  2) . 

Time  of  flight  to  2000m  for  k   weapon 
s>stem  type  (k  =  1 ,  2) . 

+■  h 

Time  of  flight  to  3000m  for  k   weapon 
system  type  (k  =  1 ,  2) . 

Time  tc  fire  a  round  following  a  hit 
for  weapon  system  type  (k  =  1,  2). 

Time  to  fire  first  round  after  target  has 

been  acquired  for  weapon  system  type  (k  =  1,2). 

Time  to  fire  round  following  a  miss  for 
weapon  system  type  (k  =  1,  2). 

Elevation  of  Unit  i  and  Unit  j  in  LOS  model. 

Firing  rate  for  TOW  weapon  system. 
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TPOL(i)       Total  percentage  of  lost  since  battle  began 
for  Unit  i . 

VISFR(i,j)  The  fraction  of  Unit  i  as  seen  by  Unit  j. 

VISFRA  Fraction  of  Unit  A  as  seen  by  Unit  B. 

VISFRB  Fraction  of  Unit  B  as  seen  by  Unit  A. 

X(i),Y(i)  Coordinates  of  Unit  i. 

XA(i),YA(i)    Coordinates  of  alternate  position  for 
defensive  Unit  i. 

XC(i),YC(i)     Coordinates  of  center  of  hi"l  i. 

tr 
XIC(i,j)      Coordinates  of  the  j  '  interval  endpoint 

YIC(i,j)      of  the  route  for  Unit  i. 

XL,YL        Distance  added  to  previous  interval  endpoint 
for  vehicle  to  move  DST  during  a  time-step. 

XL0C(i,j)     Coordinates  of  the  j  '  node  inputted  by 
YL0C(i,j)      the  user  for  the  route  of  Unit  i. 


98 


APPENDIX  B 

COMPUTER  PROGRAM 
for  the 
SMALL-UNIT  AMPHIBIOUS  OPERATION  COMBAT  MODEL 

The  small -unit  amphibious  operation  combat  model  is  a  computerized 
model  written  in  FORTRAN.  It  consists  of  a  main  program  and  19  sub- 
routines. It  was  designed  to  serve  as  a  reference  to  itself  in  order 
that  the  reader  would  not  be  forced  to  refer  to  various  manuals  outside 
of  the  program  each  time  an  explanation  of  the  functioning  of  a  parti- 
cular aspect  of  the  program  was  desired.  A  listing  of  the  computer 
program  follows. 
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C  TUS    PRCGPAM    IS    A    SMALL-UNIT    AMPHI3ICUS    OPERATION    COMBAT    MOOEL 

C  UTILIZING    LANCFESTEP-TYPE    EQUATIONS     TO    COMPUTE     ATTRITION. 

C  IT    CONSISTS    OF    T*C    e^SIC     PHASES,    THE     FIRST    BEING    THE    SHIP-TO-SHCRE 

C  CCNEAT    PHASE,    ANC    THE    SECCND    eEING    THE    LANO    COMBAT    PHASE. 

C  *****     cHjp_TQ_chCRE    PHASE     CCMMON    B LCCK    VARIABLES    ***** 

C 

COMMON     //NPH/IL(5),ne<2),i£(21»e(2),ITE,ISE,RD,WVINT(5),WlD, 
*TBW,niNIT(2)  ,GAINL,Ik«STAT<5) 

COMMON    /ENGR/     SPCMiX , SPOM  IN , HTMAX ,HTMIN, TTS, TAA , TB , TFF 

COMMON     /DISPER/T?IGV<6,2  )  ,T  SIGH  6, 2)  ,TME  ANH(6,  2  )  , 
*SSIGV(  7,  2  J  ,SSIGH( 7,2) 

COMMON    /DEF/TENGMXtSENGMX  .SENC-MN,  TAR  TM  ,SARTM,TVEL  , 
*SVEL,DEFWTS(  2) 

COMMON     /SUPEFT/G4MMA,DELT* 

CCMMCN     /IOUT/TSUFV,  ICR  INT 
C 

C  *****   LANC    COMBAT    PH*SE    COMMON    BLOCK    VARIABLES    *-**** 

C 

COMMON     /GRP1/     IPPCIR<6)  ,  I  5ECWC<6)  ,MVTDIR(6)  ,X<6)  ,Y(6  )  ,S°D(6  I 

CCMMCN    /CPP2/    TA(2),T1(2)  ,TH(  2  ),TM(  2  ),TF1(2)  ,TP2(  2)  ,TF3(2)  , 
*P  (2,6)  ,PFF(2,6),FHM(2,6.)  ,fKH(2,6)  ,TF(2) 

CCMMPN    /GRP3/    N6U , NRU, FL (  t)  , F C ( 6)  ,N0I(3)  ,XIC(3  ,200)  ,YIC(3,200), 
*IDIR(3,2C0), AVSF, ISPC 

*,  IUSTAT( e)(II<6) >L0ST(6t6  IfVl SFRA.VI SFFB, SIZETK, 
*S  IZETW,NT(6)  ,NF<6  )  ,SRF,DI  SMAX  , 

*NLCSC(6,6),VISFP(t,6),RMirTK,  P MXTK, R M  INT W , RMXTW , OP , TOWPR , L VAFR , 
*PTT<  3, 3)  .RFf POA(£i 6)  ,APOA  16,6)  ,L0A(6  ,6 ) , NA (6 ) , OF L (6  )  ,  PCL 1 6  I 

COMMON     /GRPW    TFCL(6l  ,CLDC(b,  c  )  ,Q(6,  6) 

COMMON     /G"F5/    LC"r  (6  ,ft)  ,P0T(b,6  ) 

COMMON    /FILLS/    XC  ( ICO  » YC  (IOC  )  »PEAK(  100)  ,ANGH(  100)  »SPRD(100 ) 

COMMON    /FILLS/     EC C  ( 1 00  ) , P >X (  1  CO  ) , PYY ( ICO ) , PXY(  100 ) , BASE 

COMMON     /FILLS/    NH  ILLS 

COMMON    /COVER/    CXC ( 150 ) , C VC( 15C) t CPE AK(150) tCPXX { 150)  ,CPYY(150) 

COMMON    /CCVEP/    CPXY(  150)  ,  KVELS 

COMMON     /CCLMTR/    KH  ,KHh ,K V  ,KN , KGRS ,KE  LL ,K I  NT 

COMMON     /GRID/     LST(5,4),NHL(5,4),LISTF(i50),KHREP(150),KTREP 

COMMON     /GRID/    LSTC(5f4)  ,NC{5f4),LISTC{A00  ),KCREP(150) 

COMMON     /GRP6/    ALPHA(6) 

COMMON     /GPP7/    XA(6  ),YA(6  )  ,IMCVE(6 ) 

C  *****    MAIN    DRIVER    PROGRAM    ***** 

C 

GATM=0. 
GMK=0. 
C    ***    INITIALIZE    DATA    FCR    SH IP-TC-SFCRE    PHASE 

C*LL    DATMN 
C 

CALL    SETLP 
C    ***    CCNCUCT     SFIP-TC-SHCRE    COMEAT    PHASE 
CALL    SE£  (GAT",G£~K  ) 
IF(GATK.NE.O. )     GC     TO    5 

WRITE(6,600  ) 
S1CP 
5     IF(GATK-2.C)     1C2C2C 
10  KRITEI6.610) 

GC    TC    40 
20  WPITE<6,62C> 

GC    TC    40 
3C  WPI TE  (6  ,63C  ) 

40  WRITE  (6,o4C  )     CATM 

C    ***    CCNCUCT     L4ND    CCMEM    PHASE 

CALL    GRCLNDt  GA  TM  ,  T  SUR  V  ,1  P  PI  NT  ,  TTS  ) 
C 

60C    FCRMAT(  1>, 'TOTAL    LANDED    L/NOING    FCPCE    STRENGTH     IS     INSUFFICIENT', 

*•     FOR    GRCUND    ATTACK  '  ) 

610    FCRMAT1  1  >  ,'LANC    CCM3AT    STARTS    WHILE  SHORE    COMBVT     IS     GOING    ON') 

620    FCRMATdXt  *LANC    CCMBAT    STARTS    AFTER  DEFENDER    BREAKS     CCNTACT') 

630    FCPMATdXf 'LANC    CC^BAT    STARTS    ACTER  ALL    WAVES    LANDED') 

64C    FCPMAT( /1X,« LAND    CCMeAT    ATTACK    TIME  =',F6.1,'     SECONDS') 
STCP 
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ENC 
C 

SUBROUTINE    SEA<GATM,GATK) 
C    ***    SLEROUTINE    IS    THE    MAIN    DRIVER    PROGRAM    FOR    THE    SH I  P-TC-SHORE 
C  PHASE    OF     THE    ACPHIEICUS    OPERATION.        ITS    MAIN    PURPOSE     IS    TO 

C  INITIALIZE    KEY    PARAMETERS    AND     TO    DIRECT    PROGRAM    FLCW    FCR    THE 

C  SUP-TC-SHCRE    PHASE    CF    COMBAT 


C 


CCMMCN    /AMPH/IL(5)  ,WS<  2)  ,A(  2>  , B( 2 ) , I TE , I SE ,RD, WV INT ( 5 )  ,WID , 
*T€fc»DINI1<2)  iGAINLtlhSTAT  (5) 

CCMMCN    /ENGR/     SPCMAX , SPD M  IN ,H TMAX ,HT ¥1 N, TTS ,TAA, T B , T FF 

CALL    OUTFIT 
IRC=500 
ITEW=120 
RC»1.0*I FD 

TEW=1.0*ITBW 
TINT=0.0 
C 

C    ***    CC-PUTATICN    OF    FIRST    WAVE    TIME    PAPIA.'IETERS 
C  TA-TIME    FIRST    WAVE     INITIATES    TRANSITON 

C  TB-TIME    FIRST    WAVE    CCMFLETES    TRANSITION 

C  TFF-TIME    FIRST    WAVE    REACHES    THE    BEACH 

TAA=(5CCC.-RO) /SPCMAX 

TE=TAA+TTS 

TFF  =  TB+(  FC-(  0.  5*  ( SPCMAX- SFOMIM*TTS  > -150. J/SPOMI N 

DEL=10. 
C  WFITF(6,6G0»     RC.TEW 

C    600    FCFMAT (/, IX,  »  ITERATION    I N  ITI ATED. .. R D= • , F10. 3, 1 X , » TBW  = 
C  *'  ,  F10.3 ) 

CALL    RKIM(DEL  ,  TINT,  N,  GAT  M.GATK) 

RETURN 

ENC 
C 

c 

c 

SLEROUTINE  RKI  M  (H  ,TI  »N*G  ATP ,  GATK  I 

C 

C    ***    SLePOUTINE    P.KINT     FPCVICES    THE     INTERFACE    BETWEEN 
C  THE    EULEP    NUMERICAL     IMTEGF-ATICN    RCUTINE( RKLDEQ I 

C  ANC    THE     SL8R0UTINE    ATTR     WHICH     CETEPMINES     EACH 

C  UNIT'S     STATUS     AS    TIME    PRUCRESSES    THROUGHOUT    THE 

C  AMFHIBICLS    UPEPATICN 

C 

CCMOM     /Af  PH/IL  (5  )  ,WE(2)  ,  M2)  ,  E  (2  ) ,  I  TE ,  I  SE ,  RO,  WV  INT(  5  )  ,W  ID  , 
♦  TBImDINIKZ)  iGAIM.1  IWSTAT  (5J 

CCMMCN'    /ICUT/TSURV, IPRINT 

DIMENSICN    CSUPV15  )  .CC5URV  (2  )  ,TA(5),SA(5),DA<2) 

DIMENSION       RKSLRV(7)  ,R KAT  TR { 7  )  ,  TATTR  (2  00  ,  12)  ,TI VE(200) 
C 

C  *****    VARIABLE    CEFINITICNS    ***»■•* 

C  IMX    -    MAXIMUM    ALLCWAdEL     NUMBER    OF    TIME     INTERViLS 

C  IL(I)    -    A    SWITCH    VARIAeLE    WHOSE    ELEMENT    I     IS    S ET    TO    1    WHEN 

C  WAVE     I    ARRIVES    AT    THE    SEACH 

C  ISE    -    A     SWITCH    VARIABLES     SET     TC    1    WHEN    THE    OEF.ATGM 

C  UNIT    INITIATES     ITS     FIRE 

C  IT    -   CURFENT    TIME    PE=  IGD 

C  ITE   -    A    SWITCH    VARIABLES     JET    TC    1    WHEN    THE    DEF.TANK 

C  UNIT    INITIATES    ITS     FIRE 

C  T    -    CURRENT    TI  f- E 

C  TSLRV    -     TCTAL    NUMBER    OF    SIRVIVING    LVA    AT    THE    CURRENT    TIME 

C 

C  *****    STATE     VARIABLE    DEFINITIONS     ***** 

C  CDSURV(I)    -    CURRENT    STRENGTH    CF    DEFENSIVE    FORCE     I 

C  1     =    1  TANK 

C  1=2  A  TGM 

C  CSURV(I)     -   CURRENT    STRENGTH    OF    ASSAULT    WAVE    I 

C  DIMT1I)     -    INITIAL    STRENGTH    Op    DEFENSIVE     FORCE     I 

C  RKSURV(I)    -    CONCATENATION    CF     CSURV    AND    CDSURV 

C  kVINT(I)    -    INITIAL    STRENGTH    CF    WAVE     I 

C 


101 


I>    =    235^3 

C-ALF  =  0. 

I,*£X=199 

ITE  =  0 

IS  E  =  0 

TSLRV=0. 

TI^EU  >  =  C. 

T  =  TI 

DC    10    1=1  ,5 

CSURVU  !  =  InVIN'T(I) 
7SUR\.  =  TSUPV+CSLFV(I  ) 
XLC I ) «C 
JWS7M?I)=C 
10    CCMINUE 

DC    15    1=12 

CDSURW  I)=CIMIT(  I  ) 
15    CCMINUE 

CC    20    J=  1  ,  12 
2C    TJS77R{ 1  ,J  1=0. 

n  =  i 

CC    25     1=1,5 
25    PKSuPV (I  J=CSURVI  I) 

RKSLRV(  6  )=CSlR  W  1  ) 
PKSUPV  (7  l  =  CSURV  2) 
CC    30     1=1 ,7 
30    RKAT7R1  I  )  =  C. 
M=0 
120    CALL    ATTF  (  7,  CSLttV , CCSURV  ,7A,SA,CA,GA  LF,GATK,GATM  ,  IX) 

*****    ST/TE    VARIAELE    CEFINITIONS    *  ***  = 
DM1)     -    MTRIT1CN    RATE    FCF    DEFENSIVE     UNIT     I    DUE    TO 

THE    EFF  ECTS    CF    ATFFS/TLF 
SMI)     -     riTRITIIN     PATE    FC  F    WAVE     I    DUE    TO    ATGM 
TAU)     -     MTRITIIN    RATE    FCP     WAVE    I     DUE    TO    TANKS 

FMTTR(I)     IS     A     ;ECTCF    CCNTAIMf^G    THE     CURRENT    ATTRITION 
LOSS    }£TES    TC    BE    APPLIED    W I THI  N    THE    EULER 
INTECRA7ICN    ROUTINE     TO    THE     STATE    VAFIA3LES. 
1=1,5  LV/    WAVES    1-5 

1  =  6  DT 

1  =  7  OS 

IX    =     IX    +    7 

IF  (IL(  1  I  .EC. 99  )    GC    TC    130 
00    4C    1=1 ,5 

FKSURV (I  )=CSLRV( I  ) 
40  RKATTF  (I)  =  (TM  I  )+SA(  I  )  )*(-1.0) 

CC    45     1=]     2 

RKSUPV  (  I+5)=CCSL1RV(  I) 

45  RK*T7=<<  I  +5  )  =  -l  .0*CM  !  ) 
S=RKLDEC  (7,RKSIRV,RKATTR  t1fH,MJ 

LSINK    =     1 
DC    50    1=1  ,5 

IF    (LSINK.EC.CJ    GC    TO     *6 

C3LRV(I)     =    CSUPV(l)     +    RKATTR(I) 
GC    TC    50 

46  CSURV  (1 )     =     PKSLRV( I  ) 
50    CCMINUE 

DC    5  5    1=1,2 

CDSUPV (  I)=RKSURV(  1  +  5) 
55    CCMINUE 

IF(S-1.)     110,12C,13C 
110  WRITE  (6,6  00) 

STOP 
130    CCMINUE 

TSLRV=0. 
CC    65    L=l,5 
65       TSLRV=TSLPV+CSLPV  (L  ) 

IF(TSURV.LE. C. )     TSLRV=0. 

TIME!  IT  )  =  T 
IF(IPRIM.EO.l)    GC    TC    999 


102 


C    ***    PRINT    RESULT    CF    SF  IP-TC-  SHORE    MOVEMENT    AFTER    EACH    TIME   STEP 

WPITE(6,61C;    T 

hFITE(6  ,6201 

CC    70    1=1, A 

PL0ST=1.-CSUP.V(I  )/WVINTf  I  I 
kRI  TE  (6,6  3  0  )     I,CSUPV(  I  ),IWSTAT  (I  )  ,  'LOST 
7C    CCNTINUE 

FLCST=1.-CSUPV  (5  1/WVINTt  5  ) 

WRITE(b  ,64C»     CSUFV(5),Il*STAT(5  ; .  :5L0S  T  ,TSURV 

FICST=1.-CDSURV(  U/DINIT(  II 

WFITF(6,65C)     CCSufiV(l) tPLCST 

FLCST=1.-CDSU? .  W Sl/DINI'l  2) 

TASURV=CCSURV (1)+CCSLRV(2) 

WFITE(6,6cC)     CCSLRV(2)  ,?L  CST,TASURV 
S9<:    CCNTINUE 
C 

C    ***    DETERMINE    R:     THE    FIRING    RANGE    TO    THE     .AST     INCOMING    ASSAULT    WAVE 
C 

R  =  PNG(T-4.*TBW  ) 
C    ***    DETERMINE     IF     ALL    WAVES    LAf^OcL    AND    LANJ    C0M6AT    STARTEC 
C  NCTE:     THE    MODEL    IS    TERMINATED     IF: 

C  1.       THE    PIPING    RANGE    TC    THE     LAST    ASSAULT    WAVE     IS    LESS 

C  THAN    75    METERS. 

C  2.       THE    DEFENSIVE    BREAKPOINT     HAS     BEEN    REACHED 

C  3.       THE    MAXIMUI*    NLMBEF    GF    ITERATIONS    HAS    BEEN    EXCEEDED 


C 


IF(R.LT.75.)    GC    TC    200 

IF(  IT.GT.  IVAX)     GC    TC    2  CO 

IF  <  IH  II  .EC.95)    GO     TO    2CC 
GC    TO    12C 
2CC    N  =  IT 
:    ***    PRINT    RESULT    OF    THE    SH I P- TO- SHCRE    COMSAT    PHASE 
W.FITE(6,6i3)     T 
*FITE( 6, 62C) 
CC    90     1=1, A 

FL0ST=1.-CSLRV(I )/WVlNT( II 
W.P  I  TE  16,6  3C  I     I  ,CSLRV(  I  ),IV>2TAT  (I  )  ,FLCST 
90    CCNTINUE 

FLCST  =  1.  -CSUF.V(5  )/WVlNT(  5  1 

WPITE(  6,  6  4Ci     CS0FV(5I  ,IWSTAT(  5),PL0ST,TSURV 

PLCST=1.-CC3UPV(  i  1/CIN  IT  (  I) 

WFITE(6,65C)     CCSLRV (1 )  ,  =  LCST 

FLCST=1.-CCSURV(  2  >  /DINIT<  1) 

T*SUPV=CCSuRV(l)+CCSLRVt2  I 

WFITE(6,66C)     CCSi_RV(2)  , P L CST  ,  T AS JRV 

WFI^Ef 6, 67C)     TSURV 

IF  (GATK.GE.l  .  )     GC    TC    999- 

IF(  TSOP  V.  LT.9.  J    GC    TO     =999 
GATK=3. 
GATM=T 
9<=99    CCNTINUE 
600  FORMAT  (IX  ,  •  ERRCR.  .S.NE.l.  CP.  2*  ) 

61  C    FORMAT  (  ///1X  ,  '  TII»E*«  ,F6.1  .IX,  »  SECONDS' //  ) 
620    FORMAT ( 1* , 'WAVE • , 2X,  iCCRC t    LEVEL'  ,2X  ,  • STATUS"  ,2X  ,' LCST-PCT" 

*2X,«T0TAL    SURV  IVING'  ) 
630  FORMAT  ( 3X , 1 1 ,3 > ,F10.4 , £X, 1 1  ,5X  ,F8 .3] 

64  C    F0FMAT<3X,'5',2>,F10.4,5X  ,11,  EX.F8.3  ,7X»  F5.  2) 
650     F0FMAT(1X,'TANK'  ,2X,C10.4  ,11X,F8.3) 
66C    FCFMAT(lX,'ATG^,,2X,FlC.4,llX,r3.2,7X,F5.2) 
670     FORMAT  (IX,  »F  INAL    LVA    SURVIVORS    ASHORE=    *  ,F10.3) 
RETURN 
END 


FUNCTION    FKLDEC(N  ,Y,  e,X,  F  ,NT  ) 

DIMENSION    Yd)  ,F(I) ,C(25  ) 

NT=NT+1 

GC    TO    (1  ,2,3  ,4  J, NT 

hl=H 

AA  =  H1/4.C 

CC    11    J=1,N 
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11    0(j)=0. 
X=X+AA 
GC    TC    5 

2  X*>+4A 
GC    TO    5 

3  X=X+AA 
GC    TO    5 

4  CC    6    L=1,N 

6  Y  (  U  =  Y( L  )+£A*F  <L ) 
N7  =  C 

X=X+AA 
FKL0EQ=2. 
GC    TO    6 

5  CC    7    1  =  1, N 

7  X  I)=Y(  I  )+AA*F (I ) 
RKLOEQ=l.C 

8  FE7URN 
ENC 

C 
C 
C 

SUBROUTINE   ATTR(  T  ,  CSUR  V,  D  JURV  ,TA ,  SA  «  CA  ,GAU=  ,GA7K,GATP,  IX) 
C 

C    ***    GIVEN    THE    CUFRENT    TIME    ANC    STATE    VARIABLE    STRENGTHS, 
C  SUBROUTINE    ATTR    CETERMINEJ    THE    ATTRITION    RATES    AND    UPDMES 

C  THE    STATLS    OP     EACH    UMT    W  JTH     FESPECT     TC     SHORE    MOVEMENT 

C  ANC     IMPLEMENTS    THIS    INFCP.  C-ATI  CN    INTO    The     ATTRITION    LCSS    RATE 

C  CCfPUTATlCN. 

C  *»««*    STATE    V4RIAELE    DEFINITIONS     ***** 

C  CAU)    -    CURRENT    ATTRITION    LOSS    RA^E     FCF    DEF.    FORCE    I     DUE    TC 

C  *TFFS<  /SMFHieiOUS     TASK     FCP  CE     FIRE     SUPPORTi/TLF    EFFECTS 

C  IL  ( I  )    -     k-HEN    ECLAL    TC    99     INDICATES    THE    DEFENSIVE    BREAKPOINT 

C  HAS    BEEN    PEACHED 

C  S*(I)     -    CLRRENT    ATTRITION    LCSS    RATE     FCF    HAVE     I     DUE    TC    ATGM    FIRE 

C  TA(I)     -    CLRRENT    ATTRITION    LCSS    RATE     FCF    WAVE    I     DUE    'C    TANK    FIRE 

C 

c 

CCMMCN     //SMPH/IL(5),we<2)  ,  t{2)  ,  E  (  2  )  ,  I  TE  ,  I  SE  ,  RD  ,  W  V  I  NT  {  5  )  ,WIO, 
*TEfctDINIT(2l  ,GAIM,IWSTAT  (5) 
CCfMCN     /CEF/TENGI*X.SENGMX  ,ScNGf N,TARTM,SARTM,TVEL , 

*SVEL,OEF'rTS(  2) 

INTEGER     TEr>G(2  )  ,S£NG(2  ) 

C  If ENS  I Ch    TRNG  (2)  ,  TWTS (2)  ,SRNC ( 2  J  ,DS LRV( 2 )  ,SWTSi  2)  , 
*CSL  RV  (5  )  ,  TA(  5)  ,  St  (5  ),CA(2J,ASX<  20) 

LSINK    =     1 

CC    10    1=1,5 
TA(  I  )  =  C. 
SA(  I  )=C. 
1C    CCNTINUE 

44***    V/SRI/BLE    CEFINITIC^S    ****** 
DTI    -    TH/ST    PCRTICN    CF    THE    DT    UMT    ASSIGNED    TO     ENGAGING    THE    CLOSER 
OF    TWO    MULTIPLE    WAVES    IN    THE    "ANK    ENGAGEMENT    WINDOW 

012    -    TH£T    PCRTICN    CF    THE    DT    LMT    ASSIGNED    TO    ENGAGING    THE     FARTHER 
OF    TWO     MULTIPLE    WAVES     IN    THE    TANK    ENGAGEMENT    WlNCOW 

031    -    THAI    PCRTICN    OF    THE    DS    LMT    ASSIGNED    TO    ENGAGING    THE    CLOSEF 
OF    TWO    MULTIPLE    WAVES    IN    THE    ATGM    ENGAGEMENT     MNDOW 

CS2    -    THAT    PCRTICN    OF    THE    DS     LMT    ASSIGNED    TO    ENGAGING    THE    FARTHER 
OF    TWO    MULTIPLE    WAVES    IN    THE    ATGM    ENGAGEMENT    WINDOW 

CS1=0. 
CS2=0. 
DT1=0. 
CT2=0. 
F/C=1.0 
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***    DETERMINE    IF     PART    CF    LANDING    FCRCE    ADVANCE    TO    ATTACK    INLAND 
KEY   TERRAIN 

IF(GATK.EC.1.0  )    GC    TC    15 

IF(GALF.EC.1.C.;NC. (CSIRV ( 1  )+OSURV<2)  l.LE.GAINL*  tDINITC 1) 
*  +  DINIT<  2  )  ) )     GATM=T 

IF(GALF.EC.1.0.ANC.  (DSUR  V  (  1  )  +  D  SURV  (  2)  J.LE.GAINLMDINIT(l) 
*+CINIT(2J))     GATK=i.O 

***    DETERMINE    IF    OEF.     BREAKPOINT    FAS    BEEN    REACHED 

15     IFUDSURWU+DStR  W2M.LT.O.  3*  (DINIT  (1  )+DINIT(2l  I  )    GC    TO    20 

***    CETERINE    ATTRITION    RATE    ON    DEFENSIVE     FCRCES    3Y     ATFFS 
EASED    UPCN    AREA    CR    AIMED     FIRE     STATUS 

*VRNG    =    FIRING    RANGE    TC    AN    ASSAULT    WAVE 

C  /  f  1 » -  9  <  1  J 

DA  (2)=B(2 ) 

IF(ITE.EC.C)     DA< i> =A( 1)*0 5URV (1) 

IF(ISE.EQ.O)    DA  (2)  =  A(  2  )*DSLRV<  2) 
GC     TC    40 
20    CSLRV(  1  l=C. 
DSLRV(2) =C. 
DA(1)=C. 
04(21=0. 

IF  (GATK.EC.l  .)    GC    TO    35 
GAT=T 


*** 


DETERMINE     !c    0 EF. ER E AKPC  I  NT    HAS    BEEN    REACHED    BEFORE    SUFFICIENT 
LANOING    FCPCE     IS    BLILT    UP    ON     THE    SHORE    FCR    INLAND    ATTACK 


25    DC    30    I =1  ,5 

WVRNG=RNG  (GAT-TBWM  I-lll 
IF(  WVFNC-.  LT  .75.  )     IL  (  I  )  =  1 

IfdUD.EC.ll     TLF=UF4CSURV(I  ) 
30    CCNTINUE 

GAT=GAT+1C. 
IF(TLF.LI.9.0.ANC.IL(5).EC.l)     RETURN 

IF(TLF.LT  .9.0. AND.  IL(  5  l.NE.  1)     GO     TC    2! 
GA1K=2  . 
GALF=1. 
GAT^=GAT 

V«RI7E(  6  ,61C  )     GATV 
610  FCFHAT (/  ,iX  ,  'LAND    C CMBAT    INITIATED 

35  IL<1)  =  99 

WPITE(fc,62C)     T 
620  FCFMAT(  IX,  'BREAKPOINT    REACHED     AT    TIME    =  ',F7.1,'     SECONDS') 

RETURN 

***    SLEROUTINE    DTGTS    DETERMINES    THE    FIRING    STATUS    FOR    THE 
ThC    DEFENSIVE    LMTS. 

40    CALL    DTC-TS(T  , T ENG , TRNG.TW TS, SENG, SRN G, SWTS.C SURV ) 

**«**    STA^E     VARIABLE    DEcINITIONS    ***** 


TIME  =  «  ,F7.1,«    SECONDS ' ! 


TENG(l)  - 

TRNG(l)  - 

TWTS(l)  - 

TENG(2)  - 

TRNG(2)  - 

TfcTS(2)  - 

SENG(l)  - 

SPNG(l)  - 

SUTS(l)  - 


THE     WAVE    NUMBER    OF     THE    CLOSER    Cc    TWO 
WAVES     IN    THE    TAK    ENGAGEMENT    WINDOW 
THE     FIRING    RANGE    TC     fcAVE    TENG(l) 
THE     FPCFCRTICN     CF    TF=    TOTAL    DT    STRENGTH 
TO    BE    ALLOCATED    TG    ENGAGING    TSNG(l) 
THE     WAVE    NUMBER    OF     THE    FARTHER     OF    TWO 
V«AVES     IN    THE    TATK    ENGAGEMENT    WINDOW 
SIMILAR     INTERPR?TATICN    AS     TRNG(l) 
SIMILAR     INTERPRETATION    AS     TWTS<1) 
THE     *AVE     NLMBEP    CF     "HE    CLOSE?     OF    TWO 
WAVES    IN    THE    ATGM    ENGAGEMENT    WINDOW 
FIRING     RANGE    tq    WAVE    SENG(  1  ) 
THE     FRCPCPTICN     CF     THE    TCTAL    CS     STRENGTH 
TO     8E    ALLOCATED    TO    ENGAGING    SENG(l) 
SENG(2)     -    THE     V.AVE    NUMBER    CF     THE    FARTHER    OF    TWO 


105 


C  WAVES    IN    THE    ATGM    ENGAGEMENT    WINDOW 

C  SRNG(2)     -    SIMILAR    INTERPRETATION    AS     SRNG(l) 

C  SWTS(2)     -    SIMILAR     INTERPRETATION    AS     SWTS(l) 

C 

C    ***    CETERMINE    THE    CUMULATIVE     NUMBER    OF    SURVIVING    LVA'S 

C  Th/T    HAVE    REAChEC    THE    eEACH    -    TLF 

C 

TLF=0. 

D C    45     J  =  1  »5 

IF(  IL(J).EQ.l)     TLF=TLF4CSURV(J) 
45    CCNTINUE 
C 

C    ***    CETERMINE     IF    TLF    eulLT    UP    IS    SLFFICENT   FOR    LAND    CCMBAT 
C 

IF( 

IF(GATK.EQ.l.  )     TLF=TLF-9. 
C 

C    ***    ALLOCATE    THE    FCRCE    STRENG1H    OF    TLF    BETWEEN    THE    TWO 
C  DEFENSIVE    FORCE    UMTS 

C 

CSLM=DSUFV(I )+CSLRV( 2) 

TlFl=(DSlPV(l)/CSUf)-*TLr 

TLF2=(DSLRV( 2) /OSlM)*TLF 
C 

C    ***    ACC    TO    C/l    AND    DA2    THE    ATTRITICN    LOSS    PATE    DUE 
C  TC    THE    EFFECTS    OF     TLF1    ANC    TLF2 

C 

DMl)=DA(l)+TLFl*tiE<U 

DA(2l  =  DA(2H-TLF2**3<  2  J 

IF  (DSURV  (1). LE.O.Q  )     CA(1)=0. 

IF(OSLRV(  2)  .Lc.C.CI    OA(2)=0.0 
ICA    =    1 
N    =    20 
MUL    =    1 
ISCRT    =    C 

CALL    LRNC(  IX  ,ASX,N,  WL»  ISCRT) 
C 

C    ***     CETERMINE     IF    TFEFE    EXISTS    AN     INCOMING    WAVE    IN    THE 
C  TANK    ENGAGEMENT    WINDCW    (I.E.     TENGU  )  .NE.O  1 

C 

IF(TENG  (l).EC.C. I     QC    TO    ICO 
ITE  =  1 
C 

C    ***    DETERMINE    THE    TI^E    SINCE    V«AVE    TENG(l)    CROSSED    THE 
C  SCCC.     METER    OFFSHORE    MARK    -Tl 

C 

T1=T-TEH  (TENG  (1  )-l  ) 

C71=TWTS  (  1)*0SLRV(  1) 

FK  =  1. 
C 

C    ***    CETERMINE    THE     SUPPRESSION    EFFECT    T0     EE    IMPOSED 
C  CN    THE     CT    UNIT     EASEC    CN    ThE    ATTRITION    LOSS    RATE 

C  CURRENTLY    IN    EFFECT 

C  SUPFAC    =    ATFFS    SUFRESSICN    FACTCR 

C 

C 


SLFFAC  =  0A(1) 


CALL    RATE  (TRNG  (1  )  tSPCdl  )  ,1 ,  SUFFACt D T1R0F  1 

C    ***  DT1R0F    -    RATE    CF    FIRE     UTILIZED    BY     0T1     AGAINST     WAVE    TENG(l) 

CALL    PUT  (TRNG  (1  )  ,WlCt  HT(  U)  ,  I.SUPFACfOTlPH) 
C    ***  DTlPh    -   HIT     F^CeAEI  LIT>    OF    POINDS     FIRcC    BY    DTI 

C  AGAINST    WAVE    TENG(l) 

C 

C    ***    DETERMINE    THE    ATTRITICN    LCSS    PATE    FOR    WAVE    TENG(l) 
C  CLE    TO    CT1    FIRES 


C 


TA(TENG(  1  )  )=0T1PH*DTIPCF*CT1 
IF     <LS  INK.EQ.O  )     GC    TC     55 

IF     (ASX(ICA).GT.TA(TENC(l  )  )  )    GC   T C    50 
TA(TENG(  11)    =     1.0 
GC   TC    55 
TA(  TENG(l)  )     =    CO 
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55  IC*    =    ICA    +    1 
C 

C    ***  DETERMINE    IF    THEPE    IS     A    SECONC    INCOMING    WAVE    THAT 

C  IS     IN    THE    TANK    ENGAGEMENT    WINCCW,     IF     THERE    IS    THE 

C  ATTRITION     RATE     CC  J-PUTATIO  NS    ARE    SIMILAR     IN    FORM 

C  TC    THOSE    PREVIOUSLY    FERFCFMEC    FOR    THE    CLOSER    WAVE 


C 


JF(TENG(2).EC.C)    GC    TO    IOC 

T2=T-IEM  (  TENG(2)-1  ) 

0T2  =  TV>TS(  2  )  *DSlRV{  1) 

CALL     FATE (TFNU (2 )  ,SPO(T2)  ,l,SUPFAC,CT2ROF) 

CALL     FHIT(TRNG(2)  »W  ID  ,  FT ( T2 > , 1 , SU PFAC i DT2 PH ) 

TA<TENG(2))=CT2FHiDT2RCc*CT2 

IF(  LSHK.  ECO)     GC    TC    65 

IF(ASX(  ICA).GT.TA<  T  ENG  (  2  )  ))    GO    TC    60 
1A(TENG<2  )  )    =    1.0 
GC    TO    65 
60  TA  (TENG(2)  )    =    0.0 

65       ICA    =    IC/    +    1 

**+     CETERINE     IF    THERE     EXISTS     AN     INCOMING    WAVE     IN    THE     ATGM 

ENGAGEMEM    WINCCW,     IF    THEFE     IS,    DETERMINE    THE    ATTRITION 
EFFECTS     AGAINST    THAT    WAVE    OUE    TO    ATGN    THE    ATTRITION 
RATE    COMFUTATICN    APE    SIMILAR     IN    FORM    TO    THOSE    FOR    THE 
EFFECTS    CLE     THE    TANK     FIRE  . 


ICC    IFCSENG  (D.EC.C)     GC    TO    20C 
ISE=1 

SI=T-Tew*(SENG( 1)-1) 
DS1  =  SHS(  I)  *DSLRV<2> 
SUPFAC=CA( 21 


SA(SENG< 1 )  ) 
GC    TC    75 
7C  SA(SENG(  1)  )     =    C.  C 

75  ICA    =     ICA    +    1 

IF  (SEMG(2  I.EC.C)    GC    TO    20C 
S2=T-1BM  (  SENG!  2)-I» 


PH) 


IF( LSINK.  EG.G)     GL 

IF(ASX(ICA).GT.SA(SENG(2))> 
SA(SENG(2)  )     =     1.0 
GO    TC     85 
80  SA  <SENG(  2)  )    =    0.0 

E5  ICA    =    ICA    +    1 

2CC    RETURN 
EKC 
C 

c 

SLBROUTUE    DTGTS  (T  ,TENG,T  FNG  ,  TWTS  ,SE  NG,SRNG,  SWTS  ,CSURV) 

C    ***  GIVEN    THE    CURRENT    TI^E    AN C    LVA    WAVE     SURVIVOR    POPULATIONS, 

C  SLERCUTIhc    OTGTS    CET=RfINES     THE    WAVE     NUi-lfiERS    THAT    ARE 

C  TC    BE    ENGAGED     eY    CEFENSIVE    TANK    AND     ATGM    UNITS    BASED 

C  CN    THE     Er>GEMENT    WINCCW    CRITERIA 

COMMON     /ANPH/IL(5 ),WB( 2)  ,A(2)  ,B(2)  ,1 TE  ,  I SE ,RD , WVI NT( 5)  ,WID, 
*TEV>,0INIT(2),GAIfa,:*STAT  (5) 

COMMON     /CEF/TENGMXtSENGMX  ,SENGf N , TAR  TV  ,5 ARTM ,T VEL , 
*SVEL,OEFWTS( 2) 

INTEGER     1ENG (2  )  ,SENG  (2  ) 

DIMENSION    TPNG<2)  ,  SRNG(2)  ,TWTS(2)  ,SWTS  (2  )  ,CSURV(5  )  ,DEMC(5  ) 

DO    10     1=1,2 
TENG(  I)=0 


107 


TwTS(  I)=0. 

TRNG(  I  )=0. 

SRNG(I>=0. 

SENG(  I  »=0 

SWTS(  I)=0. 
1C  CCNTINUE 
J1=0 
JS=0 
1<UM=0. 
SSLM=0. 
CC  100  1=1,5 

WVRNG=PNG  (  7-TEk-*{  1-1)  » 

IFCWVPKG.LT. 75,  J     IL  (  I  )  =1 

IF  UVRNG.LT.75.  )     IWSTATII)»1 

C    ***     IF    ThE    FIRING    RANGE    TO    A     VAVE     IS    LESS    THAN    75    METERS, 
C  THE    WAVE    IS    CCNSICERED    TC    HAV?     REACHEC    A    COVERED    ANC 

C  CCNCEALSC    POSITION    CIS    THE    BEACH 

IF(UViRNG.GT.TENCMX)<.CP.(CSURV(I).LT.0.05).CR. 

♦  UVPNG.L7.75.  ).CR.  (JT.  GE.  21  1     GC    TO    5C 

JT=JT*1 
TENGU1 >=I 

TWTS(JT)=QEFwTS<  J")*CSURV(  I) 
TSL*»=TSUM+TWTS(JT  I 
TRNGI  JTMfcVRNC- 
50  IF(IWVPNG.GT.SENGNX) .CR.(CSURV(I 1 .LT. 0. 05 1 . OR. 

*  UVRNG.  L1.SENGPN  )  ,CP.  (  JS.  CE.2  I  )    GC    TO    100 

JS'JS+! 
SENGfJS  »  =  I 
SPNGIJS  )  =  WVR*G 
Sw7S(  JSl  =OEFhTS(  JS)*CSUR  V  <  I ) 
SSUM=SSUK+SWTS(JS  1 
IOC    CCNTINUE 
C 

C    ***    CETEPMINE    WAVE    STATUS 
C 

CC    20    1=1,2 

CC    25    J=l  ,5 

IF<  IVS7AT(  j).NE,l.Af>D.SENG(I>.  EC.J)     IWSTAT  (  J  1=2 
25  CONTINUE 

2C    CCNTINUE 

DC    20    1=1,2 

CO    35    J=l,5 

IFdWSTATI  J)  .EC.  1)      GO    TC    35 

IF(  IWSTAT  (J  ).£0.  2.Ar.0.TENG(  I  ).E0.  J)     IWS"!"AT(  J)  =4 

IF<IhSTAT(J).NE.2  .  AND.  IE  KG  (  I  )  .EQ.J  )  IWS"TAT(J)  =  3 
35     CONTINUE 
30  CCNTINUE 
C 

IF(TENG(  D.EQ.C)    GC    TO    500 
CO    2CC     1=1,2 

TV.TS  (I  )  =TWTS(  I  l/TSUM 
200  CONTINUE 

500    IF <SENG(  1  t .£0.0  J    RETURN 
DO    6C0    1=1 ,2 

SWTSd  )  =  5WTS(  I  )  /SSUM 
600  CONTINUE 

RETURN 
ENC 
C 

c 

c 

SUBROUTINE    DATAIN 
C    ***    SUEROUTINE    DATAIN    REiDS    ALL    USER    SUPFLIED     INFORMATION 
C  RECUIRED    EY    THE    SHIP-TC-SFQRE    PHASE    OF    THE    MODEL 


C 


CCfMON     /AMPH/IL( 5  >  ,WB( 2)  ,A(2)  ,6(2) ,1 TE , I SE , RD, WV INT ( 5 ) ,WID, 

*Tev<, DIN  IT(2),GAINL,  IWSTAT  (5) 
CCPMON    /ENGR/     SPCC-AX  ,S  FD."  !N,HTf  AX  ,HTN  IN,  TTS,  TAA,  TB,  TFF 
CCfMCN     /CISPER/TSIGV(6  ,21   ,TSIGh(6,2)  ,TPE  ANH  (6,  2  J  , 

*SSIGV(7,2),SSIGH(7,2) 
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CCfMON    /CEF/TENGMX,SENGMX  ,SENGMN. TAR TM.SARTv, TVEL , 
*SVEL,DSFtTS(  2) 

CC^MON    /SLPEFT/GAMMA, DELTA 

CCfHCN     /ICUT/TSUFV,IFRINT 

READ(5,5CC)     [PRINT. 

RE/C(5t  51CI    SPCMAX,SPOMIN  ,HTM  AX,  HTM  I  N,  Wl  0 

READ(5,51C)     TTS 

READ( 5, 52C)    TENGMX, SENGMX  ,SENGMN 

READ<5,51C  >     TAFT*,SA=TM,7'*EL  ,  SVEL 

READ(5,S?C)     UTSIGV(I,J)  , !=1 , 6 ) , J=i , 2 > 

PEAC(5, 5!C)     <<TS1GH(I,J)  ,  1=1,6)  ,J=1,  2  J 

PEAC(5,52C)     ((TMEANMI.J)  ,1  =  1, 6),  J=  1,2) 

READ<  5, 52C)     MSSIGV(I,J>  ,1  =  1, 7), J  =1,2) 

RE*C<5,530)    ((SSIGH<I,J),  1=1,  7),J  =  l,  2) 

PEAD(5,54C)     (DEFkTS( II ,1*1*2) 

REACI5, 55C)     (WVINK I  I  ,  1=1  ,5) 

FEAC<5, 5«C  )     (C  IN  IT  (  I  ),  1= i  ,2) 

REA0(5,56 C)     (A  (  I)  ,1=1,2) 

RCAD(5,56C;     (8<I),I=i,2! 

REA0<5  ,56C)     (wEU  >,I=1,2  ) 

PEAD<5,51C)     GAIM 

REAC(5,57C)     GA^MA,CELTA 
5CC    FCPMAT(1«X,I1 ) 

51C    FCRMAT(  U),F6.2r?X,FA,  1,8>,F5.1,7X,F5.1,7X,F6.3) 
5  20     FCFWAT (i6X,F8.1,16X»*a.l,  16X,F£.l) 
53C    FCFMAK  7>  ,7F  10.3) 
540    FCRMAT(35X,F8.  1,14X,F8.1J 
550    FCFCAT (27X,5F1C.5  ) 
56C    FCFMAT(4<X,Fc.5,lCX,F9.5l 
£70    FCFMATC7X.F7.2,  12X.F7.I  ) 

RETURN 

ENC 
C 
C 

c 

SUERCUTUE   OUTPUT 
C    ***     SUeROUTIhE    OUTFIT     FRCVIDES    AN     INPUT     SUMMARY    PRINTOUT    BASED    UPON 
C  THE    DATA    RECEIVED    BY    SL3RCUTINE    DATA  IN.       A    PRI-JTCUT     CF    DI3PEPSICN 

C  CATA    GENERATED     AS     A    RESULT    OF     CATA    SUPPLIED     IS    ALSC    PROVIDED 

C 

COMMON    /AMPH/IH  5)  ,W3(  2)  ,  A(  2  )  ,  8(  2  )  ,  I  TE  ,1  SE  ,R.O ,  WV I  NT  I  5  )  ,WID, 
*TeW,UINIT(2),GAINL,inSTAT  (5  ) 

ccwmgn   /cisper/ts igv(c,2 )  ,t5igk(6 ,2)  ,7meanh(6,2)  , 
*ssigv( 7,2  ),ssigh(7,2) 
comon   /enc-k/   spc.max  ,spd.v  in.htp ax,htnin,  tts.taa,  tb,tff 
cgpmon    /cef/  tengmx.scngmx  ,scngfn,  tar  tm  ,saf  fm,tvel  , 

*S\i£L,0EFV.TS<2) 
CO  WON    /£UPEF7/GAM"A,0ELTi! 

C 

c  *****       INPUT  SUMMARY  printout    ***** 

c 

WP  ITE( 6, 61C) 

V»FITE<6,612) 

WRITE<  6,612) 

WFITE<6,614)     (WV  INK  I  )  ,1=  1,5) 

V«PITE<6  ,611)      (CINIK  I  )  ,1  -1,2) 

*RITE<  6,615) 

hFITE( t  ,616) 

hFITE( 6,6  17)     SFOPAXtSPCMI  N,HTKAX,HTM  IN.rtID 

WRITE<  6,6  16) 

WFITE(0,619) 

WRITE( 6,62C) 

KPITE(6,621)     TENGMX,TARTM  ,TVEL 

WRITE (6,  622)     SENG  MX , SENGM N, S AFTM, SVE L 

WRITE<6,622)     Q EFWTS ( 1 )  ,DE FWT S ( 2  I 

WFITEI6  ,£2A) 

k.FITE(  6,625) 

WFITE( 6,626)     A  (1  ),e(  i) 

WPITE(6,627)     A(2), E(2) 

WRITE<  6,626) 

*PITE(6,62<n     We(l),W8(2) 

k»PITE(6  ,63C) 
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WPITEf  6, £21)     GAINl 
WPITE<6.622)     GANMA,CEL7A 


C 

C  *****    DISPERSION    CATA    PRINTOUT      ***** 

IDISP=1 

IF    (IDISF.EQ.C)    RETURN 

WRITE<6,633 \ 

*RITE<6  ,624  ) 
CO    55    1=1,6 

WRIT E  (6,63  5  )    TS  IGV ( 1 , 1  ), T S  I  GV(  I,  2 l,TSIGH(  1 , 1 )  , TSI GH ( I , 2)  , 
*TMEANH(  I  ,1),  TMEANMI  ,2) 

55  CONTINUE 
KFITE(6,626) 
CO    56    1=1,7 

WRITE(6,637)    SSIGVUt  l)tSSIGV(It2)ffSSXGH(Xtl)  ,SSIGH(I,2) 

56  CONTINUE 
WFITEJ  6,628) 
W h iTci  6 , 629) 

C 

610  FOFMAT <•  1«,1X,»**     INITIAL    SHI  F-TO-SH  CRE    PHASE    INFORMATION    **•  ) 

612  FOFM AT (/6X,'  INITIAL    FORCE    STRENGTH') 

613  FCFMAT(l>,'WAV£,,:x,'l',5)','2,,5X,«3•,5X,•4«,5X,'5,) 

614  FOPMAT<  I>,  'L  VA  ',  f  <  2X.F4.  1  !) 

611  F0FMAT(/1X,' DEF.    TANK    ASSETS     =  • , IX, F <.  1,  5X, 
*«0EF.     ATGM    ASSETS     =',1X,F*.1) 

615  FOFMAT( / 1 lx,  'LVA    ENGR     SPECS') 

616  FORMAT ( lXt'SPCPAX'  ,2X, '  S  P  CM  I N" ,3X,'HT«AX« , 2Xt • HTMIN • , 3X, • WID» ) 

617  FOFMAT(  2X,F5.2,3X,F;.2,3X,F5.2,3X,F4.2,2X,F4.2) 

618  FORMAT ( /1X,« DEFENSIVE  TACTICAL  PARAMETERS') 

61=  FORMA  T(  1CX,'  RANGE  •  ,^X,  •  A  I  N-R E L C AO ' , 3 X ,  'PROJECT  IL  ='  ) 
6  2C  FORMAT  (  6>  i  'MAX  •  ,2>  ,  'MI  N«  ,  'X  ,  '  T  I  fE  '  ,  7  X  ,  •  V  ELCCITY  '  ) 

621  FOFMAT  (lX,',TANK',:x.F6.i,<X,F  =  .2,7X,F6.2) 

62  2  FOFMATt  1  >,'ATGM'  ,lX,Ffc.l,]X,F6.i,2X,  F5.2,7X,F6.2) 

622  FORMAT  (/  ,  IX,  'DEFENSIVE  """ACTICAL  ALLOCATION  WEIGHTS:', 
*/,lX,'WAVE  1  =  ' , F5.2.1X, ««AVE  2  =  «,F5.2) 

624  FOFMAT( /lx, 'DEFENSIVE  FCRCE  ATTRITION  COEFFICIENTS') 
62  5  FORWAT^X.'ALPFA-^'.IOX,  «  EETA'A'  ) 

626  F0FMAT(1X,'0T«  ,6X , F7 . 5  ,?X  ,F7 . ;  ) 

627  FOFMAT(  lX,'DS',6X,F7.5,<;x,F7.3) 

628  FOFMAT(/,«  AIMED  FIRE  ATTRITION  RATE  COEFFICIENTS  FOR', 
*/,'        DEFENSIVE  ~ANK  AND  ATGM  ASSETS') 

629  FORMAT  (  /lX,'we£TA(i)  =  ',F7.5,lx,'ABETA(2)=',F7.  5) 

630  FOFMAT l/l/,' BREAKPOINT    ASSUMPTION:    0.2*(T0TAL    DEF    FORCE)  •) 

631  FOFMAT( /, IX, 'DEFENDER    ATTRITION    LEVEL    ALLOWING     FOR     L^NC    COMPAT', 
*/  ,  1X,F5.2, '-(TOTAL    DEFENDER     FCRCE)') 

632  FOFMAT  ( /1X,'  ARTf<    SUF    PACT CR= ',  F5. i, 2 X,  •  ERROR    SUP     F AC TOR= « , F 5 . 1  ) 
622    FORMAK /lX.'DI  SPERSICN    DATA'/) 

6  34     FGFMAT(2X,'RANCE,,2X,'TSIGV«,2X,  'RANGE',  2X,'  TSIGH'  , 

^X,'  RANGE  • ,2X, «T*EANh«  ) 
635     FORMAT  (  lX,F7.1,2X,F5.1,iX,F7.  1  .1X.F5.1  ,1X,F7.  1  ,1X,F5.15 
626    FOFMAT (/2X, 'RANGE', 2X,'SS]GV',2X,'RANGE',2X,  'SSI  GH') 
6  27    FOFMAT <  1  X,  F7.  1  ,2X  ,  F  =  ,1  ,1  X  ,F7  . 1  ,1X  ,F5  .  1  ) 
628     FORMAT(/,'    CURRENT    STATUS    OF     k*AVE    I     VARIABLE    DEFINITIONS',//, 

*«     C    -    NO!    ENGAGING • ,/,'     1    -     LANDED',  /,'     2    -    UNDER     FIRE    BY    ATGM'. 

*•     2    -    UNDER    FIRE    3  V     TANK',/'     h    -    UNDER    FIRE    Bv     BOTH    ATGM    £    TANK 
639     FCFMAT (  «  1  •  ,' *****    THE    SH I  F-TO-SHORE     PHASE    BEGINS    *****•///) 
RETURN 
ENC 

SUBROUTINE    PHIT(PANGE,W,h  ,  IW P N ,SU PFA C , PR HIT) 
C    ***    GIVEN    THE    RANGE,     WIDTH    ANC    HEIGHT    OF     A    TARGET,     AS    WELL    AS,     THE 
C  TYPE    OF     WEAPON     EEING    USED,    SUEROUTINE    PH I T    COMPUTES    THE 

C  PROBABILITY    CF    A    HIT 

C 

COPON    /AMPH/IL(5),WE<2),M2),E(2),ITE,ISE,RD,WVINT<5),WID, 
*Tefc,DINlT(2),GAINL,IWSTAT(5) 

CCNMCN    /CISPER/TS  IGV (6, 2 )  ,TS  IGH(6,2  >  ,TMEANH(6, 2) , 
*SSIGV( 7,2) ,SSIGH( 7,2) 

CCr«MON     /SLPEFT/GAMMA.OELT* 
C 
C    ***     IV.  FN   CODE:       TANK    =    1  A 1GM     =    2 
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c 

C  <«***   VARIABLE    CEFINITICNS    ***** 

C  TSIGH    -    THE    STC    CEV    ERROR    IN    THE    HORIZCNTAL    FOR    TANK 

C  TSIGV    -    THE    STC    CEV    ERROR    IN     THE     VERTICAL    FOR    TANK 

C  TVEANH     -    THE     E  IAS     ERROR     IN    THE    HORIZONTAL    FOR    TANK 

C  TVEANV     -    THE     eiAS     ERROR     IN    THE    VERTICAL    FCR    TANK 

C  SSIGV/SSIGH    -    SIMILAR    INTERPRETATIONS    FOR    THE    ATGM 

C 

P!  =  ARCCS(-1.C) 

IF(RANGE.LT.25.)    STOP 

IF( I WFN.EC.l)     CO    TO    50 
C    ***    ATGM    FIRING    OATA    COMPUTATIONS 

WMEANH=G.O 

WMEANV=C.C 

CALL     INTFP(SSIGV, RANGE, WS  IGV,7) 

CALL     INTFF(SSIGV,PANCE,WS  1GH,7  ) 
C    ***    TANK    FIRING    OATA    CCfFUTAT  1CNS 
50    krEANV=C.C 

CAll    I  NT  F  P  t'T  ME  ANr,  RANGE,  wr-EANF, 6) 

CALL    INTFP(TSIGV,FANGE  ,WS  IGV  ,6  i 

CALL     INTFPtTSICH, RANGE, WS  IGH  ,  6  ) 
C    *»*    CONVERSION    TC     MLS 
100    Z  =  ARSIN  (H/RANGE) 

HSIGV=WS1GV*(1.+CELTA*SUPFAC) 

WSIGH=WS1GH*(  1  .  +  CLLTA-i'SUPFAC) 

TC-TH=(  l*tACOmO  >/<  2.C*P1) 

TGTn=<  APSIN(W/PANGEJ »*<64C0.0/(2«0*P  I  )  ) 
C 

C    ***     INSTITUTE    NORMALITY    ASSUMPTIONS    TO    COMPUTE    HORIZONTAL 
C  ANO    VERTICAL    HIT    FRO  EAc  I  L  IT  I  ES 

C 

C  =  -1.0-*SORT(  1./2.  ) 

HOPiM  (TG7W/2.  )-V»*EAhH)/WSIGH 

H0P2  =  (  (<-1.0*TGTW)/2.0)-«f-EANH)/WSIGH 

FHITX=1.C 

IF(ABS<  HCR1)  .GT.lf.)     GO    TC    60 

PHIT*  =  C.5-MERFC  (CH0R1  !-E  R  FC  ( C  *hO  R  2  ) ) 
60    VEPl  =  ((TGTH/2.  I-WMEANV l/WSIGV 

VER2=(  (  l-1.0*TGTH)  12.  I  -WMEANV  J /luSIGV 

PFITY=1.C 

IF(ABS( VEP1)  .GT.8.)     GC    TO    70 

Phi  TY  =  C.5"(  ERFCtC'VERl  l-ERFC<C*VE R2)  I 
70     FFHIT=PHITX*PH  ITY 

RETLRN 

END 
C 
C 

SLEPOUTINE    INTFP(X  ,ARG,VAL,N  ) 
C    ***     SLEROUTINE    INTRP     IS     t    CHECK     SUBROUTINE    TO     INSURE    THAT    RANGE    OF 
C  TARGET     ANC    DISPERSION    DAT/!    ARE    CO^PA  TABLE    FOR    PROBABILITY    CF 

C  HIT    COMPUTATION     IN    SUBROUTINE    PHIT 


C 


CINENSION    X(N,2) 
VFITE<6,6C0)     AFG 
IF(ARG.L1.X<  1,1))     GC    TO    20 
CO     10     1=1, N 

IF(AR^.GT.X(  1  +  1,1) )     GO    TC    10 
D  IFF  =  X (1  +  1,  l)-x( 1,1) 
DELTA=  ARG-X  (1,1) 

VAl=X(  I,2)  +  (CELTA/C1FF)*(X<  1  +  1  ,2  )-X(  1,2)  I 
RETLRN 
10  CONTINUE 

IF(ARG.G1.X< N,l)  )    GC    TC    2C 
VAL  =  X  (N,2  ) 
FETUPf* 
20    hRITE(6t<lC1 

STCP 
30    WFITE(6  ,620) 
6CC    F0FHAT( 1 >  ,  «ARG*****='  ,F10.3) 
610     FGFMAT(«     ERRCR     IN     INTRP    A FG. GT. X( N, 2  )  •  ) 
62C    FCFMAT('     ERROR     IN     INTRP    A FG. LT  ,X ( 1 , 1  )  •  ) 
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S1CP 
ENC 

C 

t 
? 

SUBROUTINE    R AT E(P ANGE, SP E ED, IWPN, SUPPAC,  RO£ ) 
C    ***    GIVEN    THE    RANGE    ANL    SPEED    OF    A    TARGET    ALCNG    WITH    THE    TYPE    OF 
C  WEAPON     BEING    USEC    TC    FIRE    UPCN    THE    TARGET    AND    THE     SUPPRESSION 

C  FACTOR    THE    FIR5R    IS    BEING    SUBJECTED    TO,     SUBROUTINE    RATE   COMPUTES 

C  THE    RATE    OF    FIRE    USEC    AGAINST    A    PARTICULAR    TARGET. 

C 

CCfMGN     /CEF/TEhGI»X,SENGMX  .SENGPN,  7ARTM ,S ARTM,TVEL ,SVEL 
CCKMCN     /SUPEFT/GANNA, DELTA 
RCF=0.0 

IF(RANGE.LT. 25.)    RETURN 
IF(  IWFN.EQ.2)     GC    TO    10 

IF  (FANGE.GT.TENGMX )     RETURN 

1RTM=TAF7M*(1.0+GAI'*PA*SUPFAC1 
CT=7P7M*RANGE/(TVEL+SPCED1 
PCF=1.0/CT 
RETURN 
10  IF(RANCE.GT.SENCMX)    RETURN 

IF  (RANGE. LT.SENGMN'J     RETURN 

SRTM=SAFTN*  (1.0+GAMMA*SUPFAC) 
DT=  SR TM  +  R  AN GE/(SVEL-» SPEED) 
PCF=1.0/CT 
RETURN 

enc 

c  ***  in  the  functions  ht.spd,  ihd   png,  the  argument  t 
c     is  the  tike  since  the  wave  being  addressed 
c    cpcssed  the  50co  fetep  offshcfe  mark 


C 


FLNCTICN    SPO(T) 

CCNMON     /ENC-R/     SPCMAX  ,  S  PDP  IN,  HTMAX  ,  HT  f  IN,  TTS  ,TAA  ,  TB  ,  TFF 
IF(T.GT.TAAI     GC    TC     5C 

SFD  =  S  FCVAX 

PETURr 
5C     IF(T.GT.TB)    GC    TC     ICC 

SPD  =  SFCVI  N+UT6-T1/TTS  ]*(  S PCMAX-S PCMI N ) 

RETURN 
IOC'    SFC=SPOMIN 
RETURN 
ENC 

FLNCTION    HTITJ 

CCMMCN    /ENGR/     SPCM AX , SPDM  IN, HTNAX ,HT PI N, TTS , TAA , T3  ,TFF 

IF(T.GT.TAA)     GC    TC    50 

HT=H7*A> 

RETURN 
50    IF(T.GT.TE)    GC    TC     100 

HT=riTMN+(  (  TB-T)  /ITS)*  (HTMAX-HTMI  N) 

RETURN 
ICC    H1=HTMIN 
RETURN 
ENC 

FUNCTION    RNG(T) 

COMMON     /AfPH/lL(5),WB(2),A(2),E(2),ITE,ISE,RD,WVINT(5),WlD, 
♦  TEV.DINIKZ)  ,GAINL,IfcSTAT  (5) 
CONMCN     /ENGR/     SPCMAX , SPDM  IN, HTMAX ,HT MIN, TTS , TAA , TB  ,  TFF 
IF(T.GT.TAA)     GC    TC    5C 

RNG=5CC0. C-(SFCPAX*T) 
RETURN 
50     IF(T.GT.TE  )    GO    TO    100 

RMG=RC-C. 5*(T-TAA)*(SPCMAX  +  SPD(TI   ) 

100     FNG^PD-I  (  (TB-TAA)/2.0)*(S  FDMIN+SPDMAX)  )-( (T-TB)*SPOMIN) 
IF(RNG.LT.75. )     RNG=0.0 
RETURN 
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C 

c 
c 
c 

SL6R0UT1NE   GRCUND<GATM,TSIRV,IPRINT,TTS1 
C    ***    THIS    IS     THE    PRIMARY     SUBRCLTINE    CF    THE    LAND    COMBAT    PHASE    OF 
C  THE    AMPHIBIOUS    OPERATION,       INFCRMATICN    REQUIRED    FCR    THE    OPERATION 

C  CF    THE    LANC    CCfeAT    PHASE     IS    REAO    IN     AND    PRINTED     I  f J    A    SUMMARY 

C  TABLE    FCF    USES    PlVIEW,        THE     INFORMATION    PROVIDED    BY     ALL    OTHER 

C  SLEROUTINES    USED    IN    THE    LAND    CCMBAT    PHASE    ARE    USED    IN    this 

C  SIERGJT1NE    AS     JN'UT    TO    THE    BASIC    LAND    COMBAT    ALGGRITHYM 

C 

REAL*8     CEEED 

PEAL    TSLFV,TTS  ,P (5 ) 

COMMON    /GRP1/     IPRCIR(6), I  !ECWC(6J  ,MVTDIR(6I ,X{6)  ,Y(6),SPD(6 J 

COMMON     /CRP2/     TA(2) ,T  .(2)  ,TH(  2)  ,TM< 2  )  ,TF1(2)  ,  TP2( 2)  ,TF3(2)  , 
*P(2,6),PHH(2,6),CHM(2.6),FKH(2,6),TF(2) 

COt-MCN     /GRP3/    NeUtNKU..  FH  t)  ,  Ft  iol  ,NG  I  <  3  j  ,XIC(3  ,200)  .YIC(3  ,200)  , 
*ICIR(3,2CC), AVSF, ISPC 

*» IUS~AT(  6»fII (fcJ,LQST(6f6  )  tVISFRA.VISFRB, SIZETKt 
*SIZETW,NT(6J  ,.\F(  6)  ,  SP(:,DI  JMAX  , 

*NLCSC(6  ,6)  ,VISFR(6,6)TRM INTK,RMXTK, RM  INTW, RMXTW , QP , TOWFR , L VAFR, 
*PTT(3,3)  ,RF,PCA(6,fc)  ,AFOA  16,6  )  ,LOA(o  ,6  )  ,  NA  (6  )  ,  OFL  (6  I  ,  POL  (6) 

COMMCN     /CPP^/     TPCL( 6)  ,CLDC(6,  6  )  ,0(6,  6) 

COMMON     /GPF5/    LOT  (6  ,61  ,RCT<6,6  ) 

COMMON     /HILLS/     XC  (  ICO)  ,YC  (IOC  )•  PEAK  (  100)  »SX  (100  J  ,SY(100),  RHOdOO  ) 

COMMON     /HIlLS/    SCALE  (  100)  ,TWCFFG(  100  >,TWOSCL(  100)  .BASE 

COKMON     /HILLS/     NHILLS 

COMMCN    /CCVER/    CXC(  15  :i ,C >C( 15C) ,CPE AK(1 50)  ,CPXX (150)  ,CPYY (150) 

COMMON    /COVER/     C3XY(  1!>0)  .NCVELS 

COMMCN    /COUNTR/    *H  ,KH  ,»  , KV  ,KN  ,  KGRS  ,KE  LL  ,KI  NT 

COMMON     /GF  10/     L3T(  10,  10)  ,  f^HL<  IC  ,  1  0)  ,  L  I  STH  <  <+5  0)  ,KHREP (100)  ,KTREP 

COMMCN     /GRID/    LSTC( 10  ,10  )  ,NC( 10,10) , LISTC(AOO) ,KCREP( 150) 

COMMCN     /GRP6-'     ALPHAS) 

COMMCN     /GPP7/     >A (6  ),  YA(6)  1IMOVEC6J 
C***       INITIALIZATION* 

C  ***    VARIABLE    OEFIMMCN  5    **++* 

C  BL    -    INITIAL     TE-ENSIVE    ^CFCE    LEVEL 

C  RL    -    INITIAL    AGCFESSCP    FCFCE    LEVEL 

C  ZL    -    ZERO    LEVEL 

EL=0.0 

FL=C.C 

MP  =  0 

f» 1=3.1 4 15? 

ZL=.00CC1 

***       READ    TERFAIN    3 f H     FOR    LINE    OF     SIGHT 

***       CHECK    FOR    STOCHASTIC    OR    DETERMINISTIC    ATTRITION 

I7RIT-A7T3ITICN    MODE     1=0 E7ERMIN  !  STIC 

0=S7CCHASITIC 

DSEEC-D0U8LE    PRECISION    SEED    NUMeER 

PP     AND    CC    ARE    THE    BETA    0  ISTR  IBU  T I  QN    PARAMETERS    FOR    DEF    UNITS 

PD    AND    QO    ARE    THE    BETA    DISTRIBUTION    PARAMETERS     FOP    ATK    UNITS 

FEAC(9,5CC)     IT*17,CSEEC 
READ(9,5C1)     PP,CC 
CC    5    1=1  ,2 

CALL    GGBTR     ( CSEED ,PP, 0 0,1 , R ) 
ALPHA  (I  )  =  P  (  1) 
5    CCNTINUE 
C 

READ(9,500)     ITRIT,CSEEC 
REAC(9,501)     PCCC 
DO   6    I  =4 ,a 

CALL    GGBTR     (  C SE ED ,PD, Q 0, 1 , R ) 
ALPHA  (I)=P (1) 
£    CCNTINUE 
C***       READ    IN    NUMBER    CF    ATTACK     *ND    CEFEMSE     UMTS 
C  NBU    -    NUMEEF    CF    CEFEf>SIVE    UNITS 

C  NRU    -    NLMEEP    CF    AGGRESSCF    UNITS 

C 
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c 

c*** 

c 

c 

c 


c 

c*** 

c*** 
c 

c 

c*** 

c 

c 

c 

c 

c 

c 

c 

c 


PEA0(9,5C2>     NBL.NRU 

INITIAL  IZE   WEAPON     SIZES 

SIZETK    -    SIZE    CP    LVA 
SIZETW   -    SIZE    CF    TOW 

SIZETK=2.5 
SIZETW=2.f 

READ  IN  EFFECTIVE  WEAPON 
RKINTK  ANC  RMXTK  ARE  MAX 
RMNTW     ANC    RMXTW    FCR    MAX 


WEAPON    SYSTEM 
WEAPON    SYSTE* 


FANGES 

AND     ^IN    RANGES 

ANC    MIN    RANGES 


OF 
GF 


LVA 

TOW 


MOUNTED  WEAPON 
DEFENSIVE  WEAPON 


REAC(9,5C2  )    RMIhTK,RMXTK , FMINTW«RMXT fc 


/FR  ANC  NOD 

A  MOVING  UNIT  IS 
LCTICN  FACTGP  FOR 
t  NCNFIRING  UNIT) 
ENDING  7CW  WEAPON 
POKING  LVA  V.EAPCN  . 
"FERVALS  UNI  T  I  DELAYED  IN' 

OF    CTHER    J  NITS  ) 


INITIALIZE  PM.RF.TCkFR ,LV 
Ff  -  FFCFORT  ION  CF  TIME 
RF    -    DETECTION    BATE    RED 

(  IN^CCMPAP ISCN     TO 

TGWrR    -    FIRING    RATE    CEF 

LVAFR    -    FI RING    RATE     ATT 

NOO    -    NUM8ER    OF    TIME     IN 

(TOO    FAR    IN    FRONT 

Pf=.352 
RF=.5 
TOWFR=.C3 
LVAFR=.  1 
NOD  =  2 

CO    10    1  =  J.NRU 
NOI  (  I  1=125 
CONTINUE 
K=NRU+1 
L=NRL+NEL 
CO    15    I>]| L 
IK  I  )  =  C 
15    CONTINUE 
C 

C***    RE/0    IN     FCRCE    LEVELS    CF    EACH    AGGRESSOR    UNIT 
C 

ISURV=     INT(TSURV/MRUJ 
CC    20    1  =  1, NRU 

FL(  I  )=FL0A7  (ISUFV) 
20    CONTINUE 
C 

C***    CHECK    FOR    TVPE    CF    RCUTE    DE TERM I NITICN 
C 


SEARCHING    C0R 
A    FIRING    UNIT 

SYSTEM 

SYSTEM 


TARGETS 


MOVEMENT 


10 


REA0<9,504)     IRTE.ISPC 
*****    VARIABLE    DEFIM 


IRTE  - 


ISPO  - 


TON 


CENCTES  wFETrEP.  USER 

0  -  FFOGFAM  DETERMINE 

1  -  LSER  DETERMINED  R 


AV 
OS 


SC 

T 


INPUT  VARIAELE 
1  -   9  MPh 
2-12  MPH 

3  -  15  MPH 
4-16  MPH 

AGGRESSOR  FORCE  NOVEM 
AVERAGE  SPEEC  CF  AGGP 
DISTANCE  IN  METERS  TO 
AN  ACGRESSCR  UNIT 


c    ***** 

WANTS    TO    INPUT    ROUTES    OR    NOT 
D    ROUTES 
C'UTE  S 
C    DENOTE    USER'S     DESIRED    SPEED    FOR 


ENTS 

ESSCR    FORCE    MOVEMENTS 
BE     MOVED    EACH    TIME    STEP    BY 


C 


IFUSPD.EC.l  ) 
IF  (ISPO. EC. 1  ) 
IFUSPD.EC.2) 
IF(  ISPD.EC.2  ) 
IFUSPD.EC.3  ) 
IF ( ISPO. EC.3  1 
IFUSPD.EC.4  ) 
IFJISPD.EC.4) 


AVSP=?.0 

CST=^0.232 

AVSF=12.0 

CST=52.6A2 

AVSF=15.0 

CST=67.0f3 

AVSP=13.0 

CS7=80.463 


READ    IN     INITIAL    AGGRESSOR    LNIT'S    LOCATIONS 
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25 


30 

250 
255 


CO    25    I*lrNRU 

REAC<<=,506) 
CONTINUE 
IFIIPTE. 

DO    3  0 
DC 


XIC(I,1  ),Y1C(  1,1) 


7C    250 


EQ.1J  GO 
1  =  1  ,NPU 
3C    J=2,125 

YIC<  I,J)=YIC(  I, J-1)+CST*(J-  1) 
XIC  (I  ,J)=XIC(  It  J-1)+EST*(J-1) 
IDIR(  I,J)=0 
CONTINUE 
GO    TO    255 
CALL    ROUTE 
SL^RO=O.C 

*****     STATE     VARIABLE    CEFINITICNS    ***** 
FLU  I    -    FCRCE    LEVEL    CF    UNIT    I 
SUMPC    -    TOTAL     AGGRESSOR    FCRCE    LEVEL 


MVTDIR(  I  ) 
ICIR( I ,J) 
IUSTAT( I  ) 


NF(  I)    - 

11(11    - 


IN    THE    ITH    ROUTE 


MCVEMENT    DIRECTION    CF    UN IT    I 
DIRECTION    CF     1HE     JTH    INTERVAL 
CURRENT    STATUS    UF    UNIT     i 

0  -    UNIT    ALIVE    ANC    NOT    FIRING 

1  -    UNIT    ALIVE    ANC    FIRING 

2  -    UNIT    DEST  FCYEC 

3  -    UNIT    MCVI  r>G 

NUMBER    CF    TIME    INTERVALS    UNIT    I     IS    ALLOWED    TC    FIRE 

fil    SANE    LOCATICN 

INTERVAL     INOEX    FOP    UNIT    I 


35 


CC  35  1= 
F0(  I  I 
SUMRC 
X<  I  )  = 
Y(  I  )  = 
MVTQ  I 
SPO(  I 
IUSTA 
IPRDI 
ISECW 
NF{  I  ) 
IK  I  ) 

CCNTINUE 


C***    READ 

C 

C 

C 

c 
c 


IN    C 

IPRCI 
ISECW 
SUMBG 


ltNRU 

=  FL(  I) 

=  SUMRC+FO(I  ) 

)IC(  I  ,  1) 

VIC(  1,1) 

R( II >ICZR(Itll 

»=AVSP 

t  m=o 

P<  I) =1  CI R ( I  ,1) 

D(  I)  =  120 

=  1 
=  1 


EFENSIVE    LNIT'S    L 
****    STATE    VARIAB 
F  (I)     -    PR  INCIPLE 
C( II     -    WIDTH    OF     S 
-    TCTAL    CEFENSIV 


CCATICNS 

LE    DEFINITI  CN'S    ***** 

CIRECTION    OF    FIRE    FOR    UNIT     I 

EARCH    SECTOF    FCR    UNIT     I 

E    FORCE    LEVEL 


40 


-*** 


SLMBO=0. 

CC  40  1= 
READ( 
F0(  I  I 
SUMBC 
MVTDI 
SPO(  I 
IUSTA 
IMOVE 

CCNTINUE 

CHECK    FCR 

**+#■■* 

IALT    -     I 

0 

1 

eREAK    - 


0 
K»L 

c,30  7)     X(I],H(II,  fL(  I  )  ,  IPRDI  P(  I)  ,  ISECWD(  I) 

=  FL(  I  J 

=  SUMEC  +  FO  (I  ) 

P (II =C 

1  =  C.  u 

T (I)  =0 
(  I  l=C 


ITEM    - 

TA(KJ  ■ 

T1(K)  ■ 

TKKI  - 
TKK) 


ALT 

STA 

NCIC 

-  Y 

-  N 
CLCS 
EEFO 
L.^eE 
C  TH 
T  IME 
life 
TIME 
TIME 


ERNAT 

te  v; 

A7ES 
ES 
0 

EST    C 

RE    BR 

R    CF 

E    ALT 

TO    A 

TO   F 

TO    F 

TO    F 


E  DSCENS 
RIAELE  0 
IF    4LTER 


ISTANCE 
EAKPQINT 
TIME  INT 
ERNATE  C 
CGUIRE  A 
IRE  1ST 
IRE  A  RC 
IRE    A    RO 


IVE     POSITIONS    AND    READ     IN    IF    WANTED 

EFIMTICNS     ***** 

NATE    DEFENSIVE    POSITIONS    DESIRED 


ALLOWED    BETWEEN    OPPOSING    FORCES 

REACHED    FOR     PROGRAM 

ERVALS    ALLOWED    FOR    DEFENDER'S    MOVE 
EFENSIVE    POSITIONS 

TGT  FCR  KTH  WEAPON  SYSTEM  TYPE  (K  = 
FOUND  AFTER  TGT  ACQUIRED  eY  KTH  wEAP 
LND  FCLLCWI NG  A  HIT  FOR  KTH  WEAP  SYS 
LND     FOLLOWING    A    MISS    FOR    KTH    WEAP     SYS 


1  ,2) 
SYS 


115 


FLIGHT 

FCR 

KTF 

WEAP 

SYS 

PROJECTILE    TO 

1000 

METERS 

FLIGHT 

FCR 

KTH 

WEAP 

SYS 

P"OJECTILE    TC 

2000 

METERS 

FLIGHT 

FCR 

KTH 

WEAP 

SYS 

PRGJECTILE    TO 

3000 

METERS 

C  TFKK)     -    TIME    OF 

C  TF2(K)     -    TIME    OF 

C  TF2(K)     -    TIME    OF 

C 

REAO(9,5CE)     I  ALT  ,  EREAK ,1 T EM 

IFUALT.EC.l  )     GC    TC    260 
DO    4  5     I=K,L 

REAC(9,506)     XA(II,Y4(I) 
45  CCNTIhUE 

2tC    CELT^IO. 

TA  (1)=2C. 

Tl  (i)=8. 

TH(1)=8. 

TM(1)=10. 

TFK1)  =1. 

TF2(1»  =  1. 

TF2(1)=1. 

TA(2)=20. 

T](2)=a. 

TH<2)  =  8. 

TM(2)=15. 

TF1(2)=10. 

TF2(2)=12. 

T  F  2  (  2 )  =  1  f  . 

***    REAC    IN    KIT    AND    KILL     FFCBA E IL I T  IES 

*****     STATE    VARIABLE    DEFINITIONS    ***** 
P(I,J)     -     FROB     1ST    RC'JNC    HIT    BY    UNIT     I     IN    RANGE     BAND    J 
FHH(I.J)     -    PRCE    OF    HIT    FOLLOWED    BY    A    HIT 
PFM(I.J)     -    PRCe    OF    HIT    FOLLOWED    BY    A     PISS 
PKH(IfJ)     -    PRCE    OF    A    KILL    GIVEN    A    HIT 
PTT(I.J)    -    PROPORTION    SURVIVING    FIRE     PCWEP    ALLOCATED    TO 

ITH    TARGET     IF     J    TARGETS    ARE    AVAILABLE 
NLCSC(I,J>    -    NLKBEF    CF    CCrTINUCUS    TIPE    INTERVALS    THAT    A    LINE    OF 

SIGHT (LOS  I     DCES    NOT    EXIST    BETWEEN    UNIT     I     AND    UNIT    J 
0(1, J)     -     FPOEAEILITY    UNIT    J    NCT    DETECTED    BY    UNIT     I     AT    CURRENT    TIKE 
VISFP(I,J)    -    FRACTION    CF     hEIGHT    OF    T GT    J    VISI3ILE    TQ    FIRER     I 
IRAN    -    RANGE 

DO    55    1=1,2 

CO    5C    J  =  l,6 

RE  tC  (9,  5  09)     P(  I,  J  ),  FHH<  I,  J)  ,PHM(I,  J  ) ,  PKH  (  I  ,J) 
5  0  CONTINUE 

55    CONTINUE 

PTTC1 ,1  )=1.0 
PTT(1,2)=C.S 
FTT(2,2  )=C2 
PTKlf  3)  =  C3 
PTT(2,3 >=C15 
FTT(3,3 ) =0.05 
DO    6C    1*1, NRU 
DO    6C    J=K,L 

NLCSC(  I  ,„)=0 
NLCSC( J, I) =C 
Q(  I ,  J)  =1 .0 
Q(», 11*1.0 
VI JFR( I  ,o)=C.O 
V  ISFR( J,  I)=C.O 
6C    CONTINUE 
IC  =  1 

C***    PRINT    INITIAL    BATTLE    INFORf-ATICN 
C 

WRITE(6,6CC) 
WPITE( 6,6G1» 
CO  65  1=1, L 

WRI  TE(fe,603  )  I  ,X(I)  ,Y  (  1)  ,FL(I) 
65  CONTINUE 

IF  (  ITRIT.EO.  1)  GC  TO  265 
WRITEU.6C4  I 
GO  TC  270 
265  WFITE<6,605) 


116' 


27C 
275 


280 


70 
265 


75 


8C 


CM* 
C 
C 
C 

290 


29! 


85 


IF  (IRTE. 

WRITS 
WPITE(6, 
fcPITE(6, 
IFUALT. 

WRITE 

GO    TO 

WPITE(6, 

CC    70    1= 

WRITE 

CCNTINUE 

IRAN=50C 

WRITE( 6, 

CO    75     1= 

WRITE 

IRAM  = 

CCNTINUE 

IRAN=5C0 

W'F  ITEJ6, 

DO    80    1= 

WRITE 

IRAN  = 

CONTINUE 

WRITE( 6, 

WFITE<6, 

WFITE(  6, 

UPDATE    LC 

NF    - 

NOD    - 

0ISMAX=5 
00    c.O    1  = 
IF(  IU 
IF 


)  GG  TC  275 
.C6) 
AVSF 
SPEAK 
)  GC  TO  28C 
>09  ) 


ECO 
(6,6i 
6C7) 
tCE) 
ECO 
(6,6< 
255 

no 

f,L 

(6,611)     I,XA(I!,Y/(II 


612) 

1,6 

(6,613)     IPAN.Pd,  I)  ,PHH(1  ,1)  ,FHM(1,I),PKH(1,I) 

IRAN+500 

61A) 

1,6 

(6,613  )     IRAN  ,P(2,  1)  , FHH(2,I )  ,  PHM (2  , 1  I , PKH ( 2  ,  I  ) 

1RAN+5CG 

6151 
617) 
61E) 

CATICN    CF    REC    UNITS. 

NUMBER    OF    T iy  E     INTERVALS    UNIT     I    DOES    NOT     FIRE 
NUMBER    OF    TIME    INTERVALS    UNIT    I     DELAYED    IN    ^VEMENT 


CCC. 
ItNR 

STAT 

(IUS 

NF( 


00 


85 
IF 


J    = 
(J 

IF 


CGNTI 
IK  I  ) 
K7=I  I 
X(  I  )  = 
Y(  I  )  = 
MVTOI 
IPRD  I 
<30    CCNTINUE 


NUE 


0 
U 

( I). 

TAT( 

I  )=N 

IF(N 

N 

1, 

.EC 

(  IUS 

OIST 

I 


EQ.2)    GO     TO    SO 

I  l.ECO)     GO    TC    295 

F(I)+1 

F(I  )  .LT.NCD)     GC    TO   90 

F  < I ) =1 

NPU 

I  )     GO    TO    85 
TAT(  J)     .£0.     2)    GO    TO    85 

=    X( I )     -    X( J ) 
F     (CIST     .GT.     OISMAX)     GO    TO    90 


(I) 
>IC( 
>IC( 
F(  I) 
Fill 


IK  I)    +    1 


I  ,K7t 
I.K7I 

=ICIP(I,K7) 
=  ICIF.(  I,K7) 


LINE — OF-SIGHT    CHECK    BETWEEN    UNITS   AND 
•**<**    STATE    VARIABL  E   DEF  INITIONS 


TARGETS 

I 


SELECTION 


95 


NIU)     -    NUMBER    OF    TARGETS    DETECTED    3V    UNIT 

XX1.YY1    -    COORCIf-ATES    CF     UNIT     I    LOCATION 

XX2,YY2     -    CJCRCINATES     CF     UNIT     J    LCCATICN 

TMACKTMACJ    -    ELtVATICN    CF    UNIT    I     ANC    UNIT    J 

0,0    -     INCICATES    NO    UNITS     UNDER    GROUND 

SIZETK,  SIZETW    -    SIZE    CF    LVA    VEHICLE     ANC    SIZE    OF    TOW    VEHICLE 

LATCB    -     INDICATOR     VARIABLE    FCP    ONE    OR     TWO    WAY    LOS    CALLS 

0  -    CC    NOT    COMPUTE    LOS    FROM    UNIT    A     TO    UNIT    B 

1  -    CCMPUTE    LCS    FPCM    UNIT    A    TC    UNIT     8 

(YIELDING    VISFPB) 
VISFRA    -     FRACTION    CF    HEIGHT    CF    TGT    AS    SEEN    BY    UNIT    A 
LCST(I.J)    -    INDICATES    IF     LCS    EXISTS     BETWEEN    UNIT     I    AND    UNIT    J 
0    -    NO    LCS    EXISTS  1    -    LOS    EXISTS 

CO    95    J=K,L 

NT( J  )=C 
CONTINUE 
CO    105     1=1, NRU 

NT{ I  )=C 


117 


I?<  lUSTATd  ).£ 
OC  100  J=K, 
IF(  IUSTA 
XX1  =  X 
^f  Y  1=Y 
CALL 
XX2  =  X 
>Y2=Y 
CALL 

LAioe 

LBTOA 

CALL 

♦  5IZETV,,  LJ1CB  ,LBTO 

VISFR 

\  ISFP 

1F(VI 

LO 

LO 

NL 

NL 

GO 

iOO  10ST( 

LO£T( 

NLOSC 

MLOSC 

F;ANG£ 

!F(RA 

IF 


GO 


EQ. 


!05 


F(PA 
IF 


ICC  C 

1C5    C0N7 

CO    1 
i 


CNT 

I'NlL 


C.2) 

L 

T(J) 

(I) 

(I) 

ELEV(XX1 

(J) 

(J) 

ELEV(XX2 

=  1 

=  1 

LOS  (XXI  , 

A,VIS.=RA 

(It J)=VI 

(J,I)=VI 

SFRA.GT. 

ST(I,J)= 

5T(J,I) = 

GSC ( I f j  i 

OSC  (J,  I  ) 

TG    ICO 
I,J)=1 

j,n  =  i  ' 

(I  , J) =o 

(J, I)=0 

=  SORT(  (X 

NGE.LT. R 

(Q(I,J)  . 

IUSTATJ 

NT( I )=N 

M=NT(I  ) 

LQKI.M 

RGT(  I,M 

IF(  M 

C 

NGE.LT. R 

(0( J, I ) . 

IUSTATt 

NT  (J  >  =  N 

M=NT(J) 

LCT( J,M 

RCT( J,M 

IF(M.EC 

CALL 


F( 


110 


ccnt: 
cq  i: 


INU 
15 
IF(  I 
I 
CCNT INU 


IMJE 

1  =  1, N 
US  TAT 

F(NT( 

IUS 
NF( 

p 

J  =  K,L 

L»S7AT<J).EC.2.0R.  I 
F(NT(  JJ.EC.O)     IUST 


15  U 

II  I.EC.2)     GG 

I  I.NE.CI    GG    T 

TAT(  I  1=0 

[)  =0 


TO    1C5 

2.0P.IUSTAT(J).  EQ.3)    GO    TO    100 

lYYlfTMACI) 

,YY2  ,TMACJ  ) 


YY1  ,  TMAC  1,0  .OtSIZETK,XX2,YY2,TMACJ,O.C, 

,VISFFB> 

SFRA 

SFRe 

ID     GGTO    300 

0 

0 

=  NLO  SC» I  , JJ  +1 

=NLOSC(  I, J  ) 


(I  »-X(J)  )**2  +  (Y(I)-Y(  J)  )**2  ) 
MINTK.OR.RANGE.GT.RMXTKJ     GO    TG   305 
£0.1.0)    GO    TO    30  5 
I)  =1 
T(I  )-U 

)  =  J 

)=RANGE 

.EC.l  )    GC    TO    305 

/LL     SORT(IfMJ 

VINTW.CR. RANGE. GT.RMXTW)     GO    TO    100 
EC.l.C)     GO    TG    100 
J)  =1 
TUMI 

)  =  I 

!  =  RANCE 

.1)     GO    TC    1  CO 
SORT(J,M) 


TO    110 
0    11C 


ISTAT(J).EQ.3)    GC    TO    115 
AT(  J)=0 


113 

C***    JPCATE    CF    THE    ACCUMULATED    CETECTION    PROBABILITIES. 
C 

IAA=1 
IEE=NRU 
ICC  =  K 
ICC  =  L 
FF=TGWFP 
CF  =  PM 

CO    120     1=1,6 
12C    CONTINUE 
2C7    DO    125     I=IAA,IE3 

IF(  IUSTAT (  I  J.EC.2.0R.  I 
DO    120     J=ICC,ICD 
PROP=C.C 
IF(  IUSTAT(J).EQ. 


LSTATd  ).EQ  .2)    GO    TO    135 

2. OR. IUSTAT (J  ). EQ.3)    GO    TO    130 


118 


21C 
515 


22C 
225 

220 

-•5  C 


12 


24C 
245 

25C 

120 
125 


ciceu.j 

I  F  (  L  2  5  *  ( 

IF  {.NT 

FC 

CA 

cv 

IF 


01 

N5=N1 

CC    12 


:***  f 


ICE 

140 


145 


CONT 

cc*tii  . 

1F(  IAA. 
FR=L 
IAA= 

:  =  £  = 
:::  = 

I  DO= 
OP=l 

GC    T 

IRE    ALL 
AFCAC  , 


lE 


K 

L 
1 

'  - 


i 


AN 
AN 

IF 


I— v  I  J 

*  <  J)  • 
(I  I.G 

t  . :  s  = 

LL  LA 
=EXPI 
I  NT  (J 

Q(I  » 

C-C    ~ 

=(  1.0 

I .  J 1  = 

T3    1 
(I  ) 

5    11  = 

G  1  =i  '. 

G2  =  AT 

((  ANG 

IFf  A 

G 
ANG  = 
IF(  A 


'.0  i 


ANO-ABS 
AA 

T  C 


I F  f  P  R 

IF 


"  1  -■  •   w 

(  ANG. 
-Z- 

'•     - 


I.  b  I  . 
J)=Q  ! 

g  12: 

-PS     E 
CI1.J 

=a 

l,N5 

:, :: 

; v-  2  <  ' 
AN2(  ~ 

: »  a  k  ; 

t>32, 
NG=2* 

0  "2 
Z*PAl 
K  €  •  G 1 
}  TO, 

1  A  N  ^  ^ 

«PAI/ 

E  T .  A  - 
s  p  R  o  c 


::  _:   2;; 

"~    TO     "15 

(J.  I) 

,J,PCT  <:  S.DE7RAT 

RAT«OP*OELT*PL< - 

ci    :-:    TO   21G 

k  )**  [F  =*CE  LT*FLI 
1*1 QV*OP-OV*QPl 


IKll-Y  (I).X(Kll- 
CJ1-Y( ! ) 1X1 JJ-XI 

21  •  GE  ■   -  •  ^  )       au         \J 

T.0.01     EC    TC    223 

-:  *an  gi-an 52 

22  5 
---.3-2-  AKG1 

_'fr:'     ~'-:'=2*:>tl- 

-ANG11 
180  -C 

'     3  3    TO    12  5 

*pm :  i»N5 ; 


>  > ) 


ji  ) 


Kill  I 

: ) 
220 


F 


0(1. 

GO    1 

.  ^  -  . 
Oil  - 
GC    T 

: : 

c 


(NT(J 

CALL 
C  E  I : 
l~=z 
.  I  • 
GC  T 
J )  =0  . 

3    12 : 

EQ.ll 

.;=:., 

'.252; 

[I  .JI 


a    -  •     -     • 

.  •  u       • 

-2  -  '- 

J1=C« 
0    12C 


3, J  ), 


345 

.     j 2  T '      3-3 
i  I  .J.  FCTVISfOEl 

?ROP*(  ETRAT*0EL1 
I.JI*     l 


3    123 

-E.2)    gc  -2   :: 


RAT.PS 
♦FUJI 


)  ) 


.<)     GC 
FR 


55 


C    2(2? 

3 :-"  ::•■ 


J  ]     -    AVERAbc 
A  L  L  C  C  A 1 


E     .-:"-;-E     3E:.'I~33'.  £    *»*« 


FTICN    3-    --  E 

'■'.  R  E     3'.     JNI1 


A.GGP 


■  a  5  L  ■< 


10    140 

Na(  I 
D 


:  .  •  - 


)  =  C 

0    i 


55     [=1,1 
;F(  ILSTATUI.EQ.  2.Cc.  IUSTA" 

IF  INT (  I  ) .Ei.3  :    32     "2     15: 
3  3     1-5     J=l,3 

APCAd  ,  J1=C.  : 

c  2 '.-:'..= 

IF  (NT  (I  1.E0.1I     3  2    "2 

IF(N'(  I  l.EO.  21     2-3 

\CT=2 

km  =iot(  :  ,d 

Mf2=LCT(  I  ,2) 


(II. EQ.3I 


2~3 

TC    ;:: 


3-  *ir 


155 


•"9 


FFC 


:60 


150 
265 


DO 


27C 


155    CCMINUE 


NCT 

fn 

MP2 
PFC 
APC 
FFC 
AFC 
PFC 
AFC 
APC 
GC 
NCT  =  1 
My  1  =  LG 
PRCE=1 
APCAd 
GO    TG 


MM3  = 
PFOE 
APOA 
PROe 
APOA 
PR08 
AFCA 
PROB 
APOA 
AFOA 
PROB 
APOA 
APOA 
PROB 
AFOA 
APOA 
B=(1.0- 
APOA 
APOA 
APOA 
150 
KK=L 
NA<  K 
1N  =  N 
LCA< 
PCA( 
CONTINU 
GO  TO  1 
=  2 

=LOT(I , 
=LOT (I , 
B=(1.0- 
A(  I,  1)  = 

e=c(i  ,y 

A( I  ,2) 
E= (1.0- 

A(I,1)= 

A(  1,2)  = 

TC    360 

Tllf  1) 

.0-C(  I, 
, 1) =  APG 
260 


LOT(  I, 
-U.C- 
(1,1  )  = 
=QCIfH 
(1,2)* 
=  0(  I  .V 
(1,3  I* 
»I1.C- 
(I, 1  )  = 
11,21  = 
=(1.C- 
(1,1  )  = 
[I.  31* 
=0(1  ,N 

(1. 2)  = 

(1. 3)  = 
CII,MM 
(1,1  )  = 
(!,2)  = 
(1,3  )  = 
J=l ,NC 
OTII.J 
K)  =  NA  ( 
A(  KK  ) 
HK,  IN) 
fK, IN) 
E 

55 


3) 

C  <  I ,  M 
APC4( 
Ml  )*( 
APCA( 
*1  )*Q 
APCA( 

c(  i,m 

APCA( 

■3  (  I ,  M 

APOA( 

A  P  CA  ( 

M  1  )  *  ( 

APCA( 

A?CA( 

1)  )*( 

APGA( 

APGA( 

4PCA< 

T 

) 

KKJ+1 

=  1 

=  APOA 


PI  )>* 
1,11* 
1.0-0 

1 . 2 )  + 

(It  MM 

3.3)  t 
Mil* 

1.1)  ♦ 

1. 2)  + 
fill* 
Itll* 
I, 2)  + 
1.  C-C 

1.2)  + 
1,31  + 
l.C-Q 
1,1  )  + 
I  ,2)  + 

1.3)  + 


C(I 

PTT 
(  I, 
PTT 
21* 
PTT 
(1. 
PTT 
PTT 
Q(I 
PTT 
P~T 

(It 

PTT 
PI' 
(  It 
PTT 

PTT 
PTT 


M2 

r  JL 

2) 

«  1 
•  ?• 


I 

! 
Q<  I 


*Q(  !,MM3  ) 

*BC[g 

*Q( 7,MM3) 

FCE 
C( I ,MM3) ) 

*  p  R  0  B 
,MM2  |  )«Q(  I.MM3 I 

,  2  ;■  *  p  f  r.  b 

,2 )*3CC3 

*2)*<1.0-Q(  ]  ,PM3  )  ) 
,2 )*PROB 

»  Z    '    *  -  F    C  3 

2» )*( i.0-0( J  ,MM3) I 
1,2)  tPROB 

*prc8 

*<  L.O-Q( 1  tMM3) ) 

*  P  •'  G  3 

*  P  R  r  a 

HCpRQB 


It 

(1 

(2 
(3 


(I, J  I 


^1  ) 

A(  I  ,U+PTT(  1,11*  PROS 


[***    ATTFITICN    CCMPUTATICN 

«***  STATE  VARIABLE  OEFIM 
RANGE  -  CURRENT  MINIMUM  DISTANCE 
FOA    -    PFCFCRTICN    C ?    THE    JTK 

FIFE    ON     LNIT     I 
TFOL    -    TOTAL     PERCENTAGE    LOST     SINCE    START    CF    BATTLE    FCR    UNIT    I 
AVD   -    AVERAGE    CISTANCE 


IONS    ***** 
.    BETWEEN    AGGP.ESSLR     I  NO    DEFENDER 
ATTACKER     CF    UNIT    I     ALLOCATED     TO 


SUMR=0.0 

<UP8=0.C 

CO    165    1*1, L 

IF(  IUSTAT(  I  J.EC.2.0R.  ILSTATU  )  .EQ.3)    GC    TO    165 

P6  =  NA(  I) 

SUM=C.C 

IF  (P6.  ECO)    GC    TO    3  c5 
CO     lfcC    J=1,P6 
M7=LCA( I ,J) 
IF(P7 .LT.K)    GC    TC    375 
I1YPE=2 
GC    TO    380 
275  ITYPE=1 

2dO  RANGE  =  S0RT((  X ( I » - > (M7 I ) * *2+( Y ( I  I -Y ( M7 )  1**2) 

IF  (ITRIT.EQ.l  )    GC    TO    385 

CALL     STCCH  (ITYFEtRANGE  ,AJI  ) 
GO    TO    2S0 
335  CALL    ETK(  ITYPE, RANGE, TJ 


120 


290 
160 


4CC 


C 

C* 

C 

C 


40  5 
165 


AJI=1.0/T 
SUM=SUM+AJI*Fl(M7)*P0Ad  ,J)*DELT 

CCNTINUE 
OFLd)  =FKI  ) 
FL(I  )=  FL ( I  l-SUM 
IF  (FL(  I  ).GT.ZL )    GO    TO    400 

FL( !) =  C.O 

IUSTA7<  I  )  =  2 
IF  (I.LT.K)     GO    TQ    405 

SLMB=SUM3  +  FL(I) 

TPOL(  I)=(FO  (I  )-FI 

GO    TO    165 
Sl>R  =  SUMP  +  FL(I  ) 
TPCLd  )=(FO(I)-FL(  I 
CONTINUE 


L( I ) )/FO(I) 
))/FO(I) 
**    PRINT    AND    CHECK    FCP    BATTLE    TERMINATION. 


170 
175 


I7IfE=IC«INT (TTS) 
DC    175     I'K.L 

IF(  IUSTATII  I.EC.2)    GO     TO    175 
00    i70    J=1,NFU 

IF<  lUSTAT(J). EQ. 

check  =  x<  i  )-x( 
avc=scrt((x(i 
if(avd.lt.bre 
continue 
continue 

GO    TO    415 


2)    GO    TO    170 

J) 

)-X  (  J)  )**2+  (Yd  >-Y(J  )  )**2  > 

;k. OF. CHECK. LT. 50. )    GO    TC    410 


C 

C***    COMPLETE     4GGRESSCP    UNIT'S     f-OVE 

C 


410    CO 


180     I=K 

IF( IALT 

IF(  I 

I 

I 


1.0 
T(  I 
(I  ) 
OVE 
I)  = 
I)  = 
(  IU 
180  CCNTINUE 

415  I  ITIME  =  I 

IF(  IPP  IN 
ITE 
ITE 
ITE 
18 
N6 
IF 


,L 

.EC. 

USTA 

POVE 

F(  IM 

X( 

Y( 

IF 

CNTI 

ITIM 

F(  IP 

WP 

V.R 

WR 

DO 


420  V 

*(LOT(I, J  ),J=1,N6) 

185  CCNT 

WFIT 

WRIT 

NNN  = 

DO    1 

N 

I 


425  h 

*<LOT(I, J  ),J=1,N6) 

190  CONTINUE 

43C    CONTINUE 


R.IMCVE( 
).EC.O) 
=  IMCVE(  I 
(I  ).LT.  I 
XA<  I) 
YAU) 
STAT(I). 

T  IME+  IF  I 
T.EC.  1) 
(6  ,622) 
(6,622) 
(6,624) 

5  1=1,  NR 
=NT(I ) 
(N6  .NE.O 

WRITE(6 

GO    TC     1 

PITE(6,6 

INUE 

E(6  ,627) 
E(6,628) 
NPU  +  1 
9C     I=NNN 

6  =  NT(  I) 
F(N6.NE. 

WRITE (6 
GO  TO  1 
PITE(6,6 


I). EC. ITEM)     GO    TO    440 

1USTAT<  I  )  =  3 

1+1 

TEMJ     GO    TO    180 


FQ.21     IUSTAT(I)=0 


X(GATM) 

GO    TO    430 
UTIfE 


)    GO    TO    420 

,625)     I,X(  I  ),Y(  I  ),FL(  I  )  ,  IUSTATU  I  » TPOL <  li 

15 

26)  I,X(  I  ),Y  (I  ),FL(I),  IUSTAT(  I),TPOL(  I)  . 


C)    GO    TO    42  5 

,62  9  )     I,X(I  )  ,Y(I  )  ,FL(  I)  ,  IUSTA7CI ) ,7P0L( IJ 

90 

20)I,Xd),Yd),FL(I),IUSTAT(I),TP0|.(I)» 


C 

C***    CHECK    FCR     EATTLE    TEPMINATICN. 

C 


C* 


ICT=0 
**    CHECK    IF    th    AGGRESSOR    FORCE    UNIT    IS    STILL    ALIVE 
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DO    195     1=1,  NPU 

IF(FLU>.EG.C.C)    GO    TO    195 
IOT  =  l 
195    CONTINUE 

IF<  IOT.E0.1)     GO    TO    425 
C***    NO    AGGRESSOR    FCFCE    UNIT    ALIVE    SC    DEFENOER    WINS 
WRI TE<6,621) 
GO    TO    450 
435    ICT=0 
C***    CHECK    IF    A    DEFENSIVE    FORCE    UNIT    IS    STILL    ALIVE- 
CC    200     I=K,L 

IF( FL  (  I  J.EC.0.0  »    GO    TC    200 
I0T=1 
200    CCNTINUE 

IF  HOT.  gO.  1)     GO    TO   445 
C***    NC    DEFENSIVE    FORCE    UNIT    ALIVE    SO   AGGRESSOR    WINS 
WRITE  (6,632  ) 
GO    TO    450 
C***    DISTANCE    BETWEEN    FORCES    TPO   CLOSE 
44C  WRITE     (6,632) 

GO    TC    450 
445    IOIC  +  1 

GO    TO    290 
45 C    CONTINUE 

WRITE(6,622)     IITIME 
WPITE(6  ,623) 
WP  ITE( 6,624) 
CO    205     1  =  1, NPU 
N6  =  NT(I  ) 
IF(N6.NE.C)     GO    TO    455 

WPITE(6,625  )     I  ,X(I  )  ,Y(  I  ),FL(I)  ,  IUSTATU  )  ,TPOL(  I) 
GO    TC    205 
455  WRITE(6,6  26  )I,X<  I  ),Y<  I  ) ,  FL  (  I  ) ,  IUS  TAT(  I )  ,TPOL(  I  )  , 

*<LOT(  I  ,  J  )  ,J=1  ,f*6) 
2C5    CONTINUE 

WRITE(6,627) 
WRITE(6 ,626) 
NNN=NRU-M 
CC    210     I=NNN,L 
N6=NT  (  I  ) 
IF(N6.,\E.  C)    GC    TC    460 

WRIT5(fe,629)     I,X(I)  ,  Yd  1,  FLU)  ,  IUST  AT  (  I  ),TPOL(  I  ) 
GO    TC     21C 
460  WRITE  (6,6  2  0  )  I,X<  I  ),  Y(  I  ),FL  (  I)  ,  IUSTAT(  I  )  ,TPOL(  I  )  , 

*(LOT( I  , J )  ,J=l,No ) 
210    CONTINUE 

500  FORMAT  { 1 8X»I  2 ,12X, F1C. 2) 

501  FORMAT(25X,F12.2,7X,F12.2 ) 

502  FORMAT(15X»I2,18X,I2) 

SC3     FORMAT (1GX,F7.1,10X,F7.1  ,  10X , F7. 1 , 10 X, F7 . 1 ) 

5C4     FORMAT*  1 1 X  ,  I  2  ,  1  SX  ,  I  2  ) 

506    FORMAT ( 12X, F3. 1.12X.F8. 1 ) 

5C7    F0PMAT(12X  ,F8. 1  ,12X  ,F8.1  ,  6X  , F4.1.7X,  I3,7X,I3) 

50  8    FORMAT  (19X,I1,12X,F8.1,29X,I1) 

50  9    F0RMAT(5X,F5.2,fX,F5.2,5X,F5.2,5X,F5.2) 

600  FOPMAT(  »  l«flX»»**     INITIAL    LAM3    COMBAT    INFORMATION    «* « , 
*////,  '  LCCATICN'  I 

601  FOFMAT<»     •  ,' UNIT' ,7X  ,' X'  ,  6X  ,  •  Y',4X,  •  FCRCE    LEVEL') 

602  FORMA T(  lXf  13  ,3>  tF7.  1  ,2X,F  *.  1  1 7X  ,F5.  1  I 
604     FORMAT ( /1X,'  ATTR  ITICN     IS     STOCHASTIC'/) 
6C5     FCFMA7I  /1X,'  ATTRITICN    IS     CET  E  F  MN  1ST  IC  '  /  ) 
6G6    FORMAT<  1>  ,  'ROUTES    CETEPMirEO     BY    USER'/) 

607     FORMAT ( IX , 'ATT ACK    VEHICLE    SPEEC    IS    ',F4.1,'    M.P.H.',/) 
6C8    FCFMAT( IX, 'BREAKFCINT    DISTANCE     IS     ',F6.1,'     METERS',/) 

609  FORMAT(  IX, 'DEFENDER    WILL     COT     MCVE    tq     ALTERNATE     PCSITICNS'/) 

610  FOFMAT  (IX  ,'DEFENCER    WILL     NQVE    TO    ALTERNATE    POS I T IONS  '  /1X, 
♦  •ALTERNATE    POSITIONS    AR  E  :  VI  X  ,  •  UNIT*  ,5X  ,  •  X' ,  3X  ,  •  Y  '  ) 

611  F0RMAT(1>,I3,2X,F7.1,2X,F1.1) 

612  FOFMAT  (/4X,'  AT*    KILL    P FOB  /  e I L  I  T I E S ' /  IX , • R ANGE • , 4X  ,  » P  •  , 
*4X,«PHH',2X,  'PHM',2X,'PKH't 

613  FOFMAT (2X , 14,4 (2X,F4. 2 )) 

614  FGRMAT(  /4X,* DEF.  KILL  FPC EAB I L ITI ES'  /1X,  « RANGE ' , 4X ,  '  P  • , 
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*4X,  'PHH'  ,  2X,  'PH*1  ,3X,'PKH  "J 
£15    FQRMAT(//,«    CURRENT    STATUS    OF    UNIT    I     VARIABLE    OEF INI TICNS'  ,  // , 
*•     C    -    ALIVE    NOT    FIRING',/,*     1    -    ALIVE    AND    FIRING',/, 
*•     2    -    KILLED',/,'     2    -    MOVING') 

617  FOFNATt//,'    VEHCLE    SPEED    VARIABLE    DEFINITIONS',//, 

*•     1    -       9    MPH«,/,«     2-12     frPH',/,'     3-15     MPH',/,'     A    -    18    MPH«) 

618  FOJ»WAT(  *l*f10Xt'    *****    THE    LANC   COMBAT    PHASE    BEGINS    ******,//) 
622    FORMAT  (  //1X,  'T  I y  E  =  •  ,  14, IX  ,'SECCNDS'/  /) 

62?     FOFMAT</,*    AGGPESCR    LNIT     INFORMATION') 

624    FORMAT (  lX,'UNIT',5X,'X',e>,'Y',5X  ,'FCRCE     LEVEL'  ,2X,' STATUS'  , 

*2>,,LCST-FCT',2X,,TARGETS') 
42  5    FORMAT  (  3), II  ,i>,F7.1,2X,Fl.  1  ,6X,F5.  1  ,9X,I1,6X,F5.3> 
62  6    F0FMAT(3Xf  II  ,3X,F7.1T2X«  F7.  1,£X»F5.  1,SX,I1,6X,F5.3,3X,3(I1,1X)) 
627    FOPMAT(/, «    DEFENSIVE    UNIT    INFORMATION') 
62  8    FORMAT (  1>  ,  «UNI T • , 5X , 'X • , E >, • Y  •  ,5X,' FORCE    LEVEL'  ,2X,»  STATUS1  , 

*2X,,LCST-FCT*,2X,«TARGETS,> 
62«3    F0PMA7(2>,I1,3>,F7.1,2X,F7.1,6X,F5.  1  ,9X,  I  1 ,6X  ,  F5.  3  ) 
t?0    F0RMAT(2>,I1.3X,F7.1,2X,=  ";.1,6X,F5.  1,<=X,I1,6X,F5.3,3X,3<I1,1X)) 
til     FORMAT (l>f •****■*    ACGRESCP    FORCE    IS    ELIMINATED.        END    OF    BATTLE.') 
£22     FORMAT(l>,'       *****    CEFENSIVE     FCCCE     IS     ELIMINATED.     END    CF    BATTLE.'  I 
633    FORMAT { IX, ******    DISTANCE    BETWEEN    FORCES    IS    TOO    CLOSE.     ', 
♦•END    OF     EATTLE    ****** > 
RETURN 
END 
C 

SUEf'.OUTlNE    SETLP 
C    ***    SUBROUTINE    SETUP    IS    USED    TO    READ    IN     THE    TERRAIN    DATA    AMD 
C  CREATE     PARAMETRIC    TEPRAIN.    THIS    TERRAIN    DATA    rfILL     SE    USED 

C  WHEN    CONFUTING    L  IN E-CF-S I CHT     EETwEEN     TARGETS    AND    OBSERVERS 

C  AS    I. ELL    AS    PFCVIDING    A    GRID    SYSTEM    FOR    UNIT    LOCATIONS    AND 

C  MOVEMENT. 


C 


COMMON     /HILLS/    XC  ( 100  )  ,YC  ( IOC  )  ,  PE AK (  100 ) , ANGH(  100  )  , SPRD( 1 00  ) 

COMMON     /HILLS/    ECC(  ICO) ,P >X<  ICC)  ,PYY  (ICO)  ,PXY{ 100)  , BASE 

COMI'CN     /HILLS/    NULLS 

COMMON     /COVER/    CXC ( 150 ) , C \C<  1 50  ) , CPE AK (1 50 ) , CP XX ( 150  )  ,CPYY{  150) 

COMMON     /COVER/    CP XY (  15C )  ,  NC V E L S 

COMMON    /CCUNTR/KH,KKk,KV  ,  (<N  ,  K  GR  S  ,  KEL  L  ,  KI  NT 

COMMON     /GRID/    LS7(5,4)  ,NH  L(  5  ,4  )  ,LISTF(  150  )  ,KHREP< 150 ) tKTREP 

COMMON    /GRID/    LSTC(5,4) ,NC( 5, A)  ,LISTC(A0G) ,KCREP( 15C) 

F/SI*5.1415<5 

REAi:(5,5GG)     NHILLS 

REAi:(5,51C)    BASE 

CO    ISO     1  =  1  , NHILLS 

;:EAD(  f  ,52C)     XC(I  I  ,YC(I  ),PEAK(I  ),ANGH(I  ),SPRD(I),ECC(I) 
50       CONTINUE 

PEA0<5, 52CJLST 
READ(5,  52C  1NHL 
REAC(5  ,5CC  1NHTCT 

REALM  5,  5  5C)(  LI  STH(  I)  ,1=1  ,  NHTCT) 
65       CO    iOO     1=1, NHILLS 

AANGLE  =  ANGH(I  )*PAI/180  . 

SANG=5IM  AANGLE) 

CANG=COS( AANGLE ) 

A=PEAMI)  /(  PEAK  (I  )-50.  ) 

A=ALCG(A) 

E  =  A*ECC  (I  )**2 

SSPD=  5FPD (I  )**2 

PXX(  I  )  =  -<  A*C AN  G  +  CANG+  BUSANG* SANG)  /SSPO 

PYY( I)=-(A*SANC*SAN0+B*CANG*CANG)/SSPO 

PXY(  I  )  =  (2.-v  SANC*CANG*  <  E-A  I  )  /SSPD 

KHREF  (  I  )=-2  147483600 
ALL    VALUES     NCI*     IN     METERS    CN     Q    —     10,000     GRID 
ICC       CONTINUE 

REAC(5,5C0)    NOVELS 
IF(NCVELS.EQ.0  )    GC    TO    200 

00  15C  1=1, NOVELS 

REAC(5,54C)CXC(I  ),OC(  I  )  ,  CPEAK  ( I  )  ,CPXX<  I  )  ,CPYY(I  )  ,CPXY(  I) 
KCFEFt I) =-2147A836CC 
150      CONTINUE 

READ  (5,530)LSTC 

READ(5,53C)NC 
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2CC 


5CC 
510 
520 
520 
540 


REA0(  5,50ONC  IC  T 

REAC(5,=3C)  (LISTCH ),I=1,NCT0T> 
K  TFEP=-2  147483600 
KH  =  0 
KhW=0 
KV=C 
KH=0 
KGFS=0 
KElL=0 
KIM=0 

FCPMATi  20,14) 
F0F*AT(1EX,F5.1) 
FOP  HAT ( 12X.F7.lt3X, 
FORMAT ( if  *,lCIf 1 
F0MATOF10.4.3E12. 


1,5>,F6.1,5X,F6.2,  5X,F8.2,4X,F4.1) 


END 


!URN 


SUBROUTINE    ROUTE 
***    SLEROUTINE    ROUTE    COMPUTES    THE    ROUTE     OF    EACH    AGGRESSOR       UNIT 


WHEN    THE    LSER    HAS    SElECTEC    THE    OPTION   CF     INPUT  IMG    AGGRESSOR 

THE    COORDINATES    OF    EACH    INTERVAL    ENDPGINT 
EACH     INTERVAL    LENGTH(  01  STANCE    ^ICVED    DURING 
THE    SAPE.     THE     INTERVAL    LENGTH    IS    DETERMINED 
HAS    SELECTED    AND    INPUTEO    FOR    THE    CURRENT 


ROUTES.  IT  CALCULATES 
ALCNG  THE  ROUTE  if- a  KIN 
A  IC  SECCND  llfE  STEP 
SY  THE  SPEED  THE  USER 
BATTLE. 


10 


CCfMCM 

-ICIRO, 

*,  ILS'AT 

♦SIZETW, 

*NLCSC( 6 

*P77(3,3 

CUENSI 

IF(  ISPD 

IFUSPD 

IFdSPO 

IF(  ISPD 

DC    110 

READ 

NL  =  N 

DC    1 

R 

X 

Y 

CONT 

XLCC 

YLOC 

IDIR 

NL=N 

NUM  = 

CO    1 

X 

Y 

0 

Y 

Z 

A 

D 

I 


/GPP3 


20 


30 


G 

C  C 
;  I 

n< 
1 1 

»R 

IN 

EC 
EC. 
c  » 
EC 


I) 

I 

•-Z 

c: 
cc 

M 

I, 


: ) 


/  NEU 
AVEP, 
I  (  6  1  i 
F(t 


i  5 


c  c: 


CA(  6 
CC(3  , 
)     CST 

)     CST 
!     CST 

RU 
C)     N( 

2.NL 
,51C> 
f  I N )  = 
1 1  M  > 

=XIC( 

=  Y  I  C  I 
=  C 


.NRU.  FL(  6  1  ,  F0(61  ,N0  1(3)  »X  ICO,  200  J  ,YIC(3,200)  , 

ISPD 

LCS"<  6,6  ),  VI  SFRA.V1  SFRB,SIZETK, 

j ,S?F ,DI S^  AX  , 

6«6),RMI »TK  ,PfXTK,RHINTW,RMXTW,GPfTOWFR,LVAFRi 

, 6) ,APOA  (6,6) ,L0A(6,6},NA(6)t0FL(6» ,P0L(6I 

20>  ,YLCC  12  ,20  ),N(3) 

=eo.Ata 

=67.053 
=53.643 
=  «C«  --22 

I  ) 


>lg:s,y iocs 

>  1 0  C  S 

Y  L  •:  C  S 

1,1) 

1,1) 


C     J  = 

sXLO 

=  YLO 

ST=S 

*6S< 

WXL 

GL=A 

G=AN 

(J.E 

XLN 

CIS 

YLN 

XIC 

IF( 

YIC 
IF( 


l.NL 

C( I .J+l >~<LOC  (:, J  ) 

C!  T  .J+ll-YLCC  (1  ,  J) 

QRT<XL**2-<-YL**2J 

y  l  ) 


IDI 


fan 

31* 
i.  1 

=  (  C 

T=( 

=  (C 

(It 

YL  . 

YLN 

(  I  , 

YL. 

ICI 

GO 

R(  I 


I  7  ! 

57. 
)  G 
c  7- 

DIS 

SI- 
NO  P 
GT. 
=  -Y 
NUN 
G". 
P(  I 
TO 
,NL 


2S58 

0    t,-]    50 

EX"?.  A)*  COS  (  ANGL  ) 

T+EXTRA  1-OST 

EXTRA)*  EIN( ANGL) 

)=<IC(  I  ,NUM-1  )+XLN  +XLE 

C.  )    GO     10    2C 

LN 

)=YIC(  I  iNUM-D+YLN+YLE 

C.  )    GO     10    3C 

,NUM)  =  -  !FIX(CEG) 

40 

V  I  =  I F I  X  (DEG) 
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40  NUM=NCM+1 

50  XLf«=CST*CCS  (ANGl) 

YLN=0ST*  JINUNGD 
IF(YL.GT.0.  )    GO    TO     fO 
YtN=-YLN 
60  IF(DIST.Ll.CST)    GC    TO    <5C 

XIC<  I  tNUf  )  =  XIC£  I  .NUM-11  +  XLN 
YIC(  I  ,NUMI=YICU  ,NUf-l)+YLN 
IF{  YL.GT.C.  )     GC     10    7C 

IDIR{ I,NUM)  =  -  ]PIX (CEG) 
GO    TC    80 
70  ICIR(  I,MJM)  =  IF!X(QEG> 

80  CIST=CIST-CST 

NLM=NLM+1 
GO    TO    bC 
90  EX1PA=CIST 

XLE=EXTRA*COS( ANGl) 
YLE=EXTRA*SIN(ANGL J 
IFtYL.GT.O.)     GC    TO     100 
YLE=-YLE 
100  CONTINUE 

11C    CCNTINUE 
C 

500    F0FMAT(3EX,I2) 
510    F0FMATC12XfF8.1tl2>.F8-l) 
PETURN 

enc 

c 

SLEROUT  INE    LAMM ( It J fPCTV  IS»DETRAT,P Kl 
C 

C    ***     SUBROUTINE    LAVCA     IN    CCNJKTICN    V*I  TH     THE    LCS    R'"IUTIN£    CCMPUTES 
C  THE    DETECTION     F  AT  E  ( CETR  AT  )    OF    TARGET     J    6  Y    THE    OBSERVER    I     GIVEN 

C  THE    PERCENT    CF    TAFGET    VISIBLE     (PC7VISJ    TO    THE    OBSERVER. 


C 


CC^ON    /CPF1/     IPFCIR  (6  ),  I<EC'«C(6  >  ,MVTDIR(61,X(  6),Y(6),SPD(  6) 

TCFACT=1.C 

ZEP0t.=  C.G0C01 

FA  1=3. 14159 
7       C=(  iSECVCU  >*PAI /18C.C) /2.0 

fiEE=(l. 0/(2. CMS  IMO  )-S*CCS(  C  )  ))  J 

IF  (A6S<  BES).  LT.Z5PCL)     EBeO.O 

AAA=<-Bet l*C0S(O> 

IF  (AES(  AAAl.LT.ZERCL)     AAA=0.0 

CTANG=AT/N2( (V IJI-Y(!) I,()( J)-x(! i) j 

IF(CTANG.LT.-PAI/2.AND.CT;NG.GT.-PAI )     CTANG=I*PAI+CTANG 

FD=IPRC  IF  (!)■*?  tl/ldO.O 

IF((PO*01ANG  )  .GE. CO)     GCTC     1 

IF<PD.LT  .CO  )  GOTC  9 

ANGIE=2*FAI+0TANG-FC 

GOTO    10 
9    ANGIE=2*F AI+FG-OT^NG 
10    IF  (ANGLE.  GT.  PAD     ANGlE=2*  PAI  -  A  NGL.E 

GOTC    2 

1  ANGLE=AeS  (FD-CTANG  ) 

2  IFUNGLE.GT.D)    GC    TO    3 
CLF=PO+C 

C  L  CW  =  PQ- C 

ANC-LFT=G1ANG+<15.  C*PAI/18C.  ) 
IFUNC-l  FT.GT  .CUP  )     ANGLFT=CUP 
ANGLRT  =  O1AfvG-<15.*FAI/130.1 
IF(ANGLRT.LT.DLCVn  )     ANGLRT=OLCW 

FK=EBB* AES  (ABS  (S  IN<  ANGLFT  J)- AES (S  IN(  ANGLRT)  )  l+AAA*( ANGLFT- 
*ANGLRT) 
IF(PK.LT.C0  )    GO    TC    3 
IF  (PK.GT.1.0  I     GC    TC    5 
GO    TO    8 

3  PK=0.0 
DETRAT=0.C 
GO    TO    6 

C        p  u  _  1        ft 

8    RANGE=SQRT((X(  J)-X(I  ))**2h(Y(JJ-Y(I)  )**2  ) 

RR  =  0.0C  GRANGE /PC7  VI  S 
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T0ANG=AT)£N2(  (Y(I)-Y(J)),(XI)-X(J))) 
A0=MVTCIF(j)*PAl/18O.O 
HORVEL*AeSISPD<Jl*SIN(TCA|kG-ACl  > 

HOFVEL  =  HCRVEL*16C<;.3/3  60C.O 

DENGM=1.«53+TCFAC7*  (  0.  5<3  7  £  +  2  .  188*  ( RR**2  )-0  .503 8*HORVSL ) 
If  IDENCN.LE.  ZEPCL  I    CENC*=2ERCL 
CE7RA7  =  0.CC3+1  .C80/DENCM 
CE7RAT  =  CETRAT*FK 
6    RETURN 
ENC 

SUBROUTINE    ELEV (X , Y , TMAC ) 

***    SUBROUTINE    ELEV    DETERMINES    THE    TERRAIN    ELEVATION    FOR    A    GIVEN 
SET    OF    X,    Y    CCCRCINA7ES.     THIS     ^UNCTION    IS    USED     IN    CONJUNCTION 
WITH    THE     LCS     SL6PCLTINE     IN    CONFUTING    L  IN E-OF-S IGHT    BETWEEN 
GESERVER    AND    TARGET. 

CGf<("LN     /HILLS/    XC  tiuC)  tYC  (100  ),  PEAK!  100)  ,ANGH(  100  ),  SPRDI 100 1 

CGfMON     /hILLS/     ECC(  ICC), P >X(  ICC) ,PYY (100)  ,PXY(  100)  , BASE 

COMMON     /HILLS/    NhlLLS 

COMMON     /GRID/    LST(5,41  »NH  l<  5  ,  *  |  ,L  1ST  H  ( 15  0  )  ,KHREP(150  )  tKTRE3 

COMMON     /GRID/    LS7C(5,4-)  ,NC<  5,4)  ,LISTC(4CG)  ,K.CREP(  15C) 

DMA    GSIZE/1G0C./ 
C***    FLNCTICN     1C   COMPUTE    TERRAIN    ELEVATION    FCR    GIVEN    X,    Y    COORDINATES. 

Z**X=BAS  E 

I>=1+IFI X(X/GSIZE) 

IY=1+IFIX(Y/GSIZE ) 

IF  (NHL  (  IX, IY).  ECO     GO    TO    150 

LS=LST( I X,IY) 

L£NC  =  LS-»NHL(  IX,IY)-1 

CC    100     L=LS,LEND 

I=LISTH( L ) 

OX=X-XC(  1) 

CY=Y-YC(  I  ) 

CXSQ=OX*CX 

OYSC=OY*CY 

CXY=CX*CY 

FACTCR=P>X(I  l*CXSC  +  PYY(I  )  *Q  Y  SC  +  PX  Y(  I  )*CXY 

IF  (FACTCF.LT.-3.  )     GO    TO    ICO 

HT  =  PEAK  (  1  )=c*P (FACTOR ) 

IF(FT.LE.ZVAX)     GC    TO     ICO 

ZM*X=HT 
ICC  CONTINUE 
150  T*AC=ZMAX 

RE7LRN 

ENC 


SUBROUTINE    STCChd, RANGE, /) 


***    S 
A 


LERCUTINE   STCCH    DETERMINES    THE    ATTRITION    COEcFI  C  IEN'TS    WHEN 

LSER     H£S    SELECTED    A    STOCHASTIC    ATTRITION    OPTION.    The    CALCULATION 

S    A    FUNCTION    CF    THE    ORIGINAL     STCCH A ST IC ALLY    DETERMINED    ATTRITION    ' 
rcccrrrevT     *c     uc<i       u      \      ei  imt  t  thm    nc     3  tur.: 


CCEFPIc'lENfJAS"wELLtAs"AUFUNCTIGN^dF~RANGci' 

COMMON     /GRP6/     AL?HA(6) 
CON.MCN    /C-RP5  /    NcCNRU,  FL  (  6),FC(6)  ,N0  1(3)  ,  XIC(  3,  200)  ,YIC(  3,200)  , 
*ICIR( 3, 2GC),  AVSP, ISPO 

*,  IUSTAT (6),II(6),LCS7(6,6  ),VISFRA,VI  SFR8, SIZETK, 
*SI2ETW,NT(6>  ,KF(6  )  ,SRP,D1 S^AX , 

*NLCSC(6f  £liVI£FR(6«6)tRMI  KK  .  ?fXTK,  R  M  NTW  ,  RMXTW  ,  OP  ,TCfc'FR.  LVAFR  , 
*PTT(3,3  )  ,RF,  PCA  (6,6)  ,APOA  (6,6  )  ,L0A(6  ,fc),MA(6),CFL(6)  ,P0L(6) 
IF  (I. EG.  2)    GC    TC    10 
A  =  ALPHA  (  I  )*(  ( 1.0-RANGE/RM>TW 1**21 
GC    TC    20 
IC    A  =  ALPHA(I)*<  (1.0-RANGE/RM>TK)**2) 
20    RETURN 
END 
C 

SUBROUTINE    ETK ( I , RANGE ,T  ) 

C    ***    SUBROUTINE    ETK    CCMPUTES    THE    EXFECTED    TIME    FOR    A    GIVEN    FIRER    TO 
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KILL   A     GIVEN    TARGET.    THE     CALCULATION    IS    A    FUNCTION    OF    RANGE, 
TIME    OF     FLIGhT     FCP     A    RCUNC    ANC    HIT    AND    KILL    PROBABILITIES    FOR 
THE    FIRING    WEAPON    SYSTEM.     IT     IS    A    NUMBER    THAT    IS    USEC     IN    THE 
CCMPUTATICN    CF    THE    DETERMINISTIC    ATTRITION    COEFFICIENTS. 

CCMMCN    /GRP2/    TA  ( 2) , Tl (2 )  ,TH< 2 » ,TM( 2  ) , TF 1 (2 ) ,TF2 < 2 )  ,TF3( 2 ) , 
*F(2,6),PHH(2.6),FHM(2,6),FKH(2,6)»TF(2) 
IFU.EQ.5)    GO    TO    5 
TF(  I)  =  TFH  I  ) 
GOTO    6 

5  IF(RANGE.GT.iaOC.C)    GO    TO    7 

TF(I)  =  TF1(I)-(TF1(I)*(  100C.C-RANGE)/1C00.  0) 
GO    TO    6 

7  IF(RANGE.GT. 2CCG.G)     GO    TO    8 

TFl  I  )=TF2  (  I  )-(  (TF2(  D-TFK  I  )  )*(  20  CC.  C- RANGE  )  /l  000.0) 
GO    TO    6 

8  TF(I)  =  TF2(I)-((TF3(I >-TF2 !I)  )*  (3000.  C-RANGEJ /l 000.0  I 

6  J=(RANGE-»25O.O)/5C0.C 
I  F  f  '   C T    £ )    J  =6 

T=TA(  II+TK  I)-TH(I  J+(  (TH<  I  )+TF(I)   )/PKH<  I,J))  +  ((TM(I)+TFU)>/ 
*FHMI,  J)  )*<(1.C-PHH(  I,J)  >/PKH(  I,J  )  +  PHH(I  ,J)-P(  I,  J)  ) 
RETURN 
ENC 
C 

SUERCUTINE    SORTt I ,H) 
C    ***    SUBROUTINE    SORT    IS    USED    TO    SORT   TARGETS    IN'    ASCENDING    RANGE 
C  OFCER.     THIS     IS    USED    TO    DETERMINE    THE    PRIORITY    OF    A    TARGET 

C  FOR    FIRE    ALLCCATICN. 

( 

CCfMCN     /CFP5/    L0T(6,6)  ,R0T(6,6  J 
DO    10    J=  l.M 

IF(ROT(  I,M)  .GE.RCTt  I,  J  ))     GC    TO    10 
R=FOT( I ,J) 
NN=LOT ( I  ,J) 
RGT  (I,  J)=ROT(  I,M) 
LOTU,  J)=LCT  (I  ,MJ 
ROT(I,M)=R 
LOT (I, P)=NN 
1C    CONTINUE 
RETURN 
END 
C 

SUERCUTINE    KOVER < ZC » TMACT  ,SIZET,ZT,S,HTS,ZS,VISFRT) 
C    ***     SUERCUTINE    KOVER    CETERPINES    WHAT    PORTION    OF    A    PARTICUL4L    TARGET 
C  IS    COVERED    BY    THE    TERRAIN    BETWEEN    THE    TARGET    ANO    OBSERVER. 

C  THIS    NUMEER     IS    USEC     IN    THE    DETECTION     AND    ATTRITION    COMPUTATION. 

C 

IF(S.EQ.G.)    GC    TC     10 

IF(HTS.GE.ZS)     GC    TO    20 
HEXT=ZO+(HT£-ZO)/S 
EVIST=AMAX1(HEXT,TMACT) 
IF  <  EVI ST.GE.ZT  )    GO     TO    20 

IF(  EVIST.LE.ZT-S  IZET  )     RETURN 
VIS=(ZT-EVIST  J/SIZET 

IF(VIS.LT.  VISFRT)     VISFRT=VIS 
RETURN 
10        IF(HTS.LT.ZO)     FETURN 
20       VISFRT=G.0 
RETURN 
ENC 
C 

SUBROUTINE    LOS  (  XA  ,  YA , TMAC A,TM ICA , SI Z EA ,XB , YB ,TMAC3 ,TNICB,S I ZEB , 
*LATCB,LETCA,VISFPA,VISFPfi  ) 
C    ***    THIS    SUBFCLTINE     k<AS     WRITTEN    3Y     FRCFESSCR     JAMES     HARTMAN,    NAVAL 
C  POSTGRADUATE    SCHCCL.       IT     COMPUTES    A     PERCENT    OF    A     TARGET    VISIBLE 

C  TO    A    PARTICULAR     CBSEFVER,     GIVEN    THE     COORDINATES    OF    EGTH 


C 


COMMON  /HILLS/  XC  (  IOC )  t YC  ( IOC  )  ,PE AK (  ICC)  , ANGH(  10 0 )  ,  SPRD< 1 00 ) 

COMMON  /HILLS/  ECC  ( 100  J , P >X ( 1 CC ) , PYY  ( 100  )  , PXY ( 100  )  , BASE 

COMMON  /HILLS/  NHILLS 

CGNMCN  /CCVER/  CXC(130),CYC(15C),CPEAK(15C),CPXX(15C),CPYY(150I 

COM^CN  /COVER/  CFX  Y  ( 150  )  ,  NCV  ELS 
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COMMON    ,'CDUNTR/KH,     KHW  ,     KV,     Kh  ,    KGRS  ,     KELLt    KINT 
COMMfN    /GRI3/    LS7(5,4) ,NHL(5tAI ,LISTH< 1501 ,KHREP(15C) ,K7REP 
COMCN    /GRID/    LS7C  (  5  ,4  )  ,  N  C(  5  ,  A  )  ,L  1ST  C  (400  )  ,<CR  EP  (  150  ) 
CIMENS1CN    IGX(ICC)  ♦IGYdOCJ  t  IELdOOl  ,CS1  (1301  tCS2(100) 
0^T/\    GSdE/lGOC./ 
C***    SUBROUTINE    TC    CCMFlTE    FRACTION    VISIBLE    FOR    OBSERVER    TARGET    PAIRS 
VISFRA=1, 
VISFP8=1. 
>£A=X8-XA 
YEA=v8-vA 

IF  ((X3A.E0.C.  )  .AM"  .(YEA.  E  0.0.  )  )    RETURN 
IF(  SIZEA+TMICA.LE.O.J     GO    T0   510 
IF(  S  IZES+TN  ICB.  LE.O.)     GO    TC    510 
IF  (TMICA,  I  .7.0.  ]     VISFRA=1.0+TMICA/SIZEA 
IF(TM;C3.  LT.C.  )     \»ISFRB*1.0  +  TPICB/SIZEB 
ZA  =  TyiC.A     -»    1MICA    +     EIZEA 
Zfl=!WCB    +    1  M  I C  8    +     SIZEE 
KTREP=KTREF*1 
ZEA=^ZF>-ZA 
XB*SC»*B**XEA 
Yfi/SC*YB**YBA 
XYEA=XEA*YE/ 
TW0>BA=2.*>eA 
TSCY'iA  =  2.*YEA 
C***    COMPUTE    G*iC    SCUAPES    CROSSED    BY    A    TO     e    LINE 
NC-PSQ=3 

IF(XBAi     HO,  SSilOO 
«5  XBA*Q,I 

IOC  I  S G  >  =  - 1 

XINC  =  GSI  ZE/XliA 
GO   TO    12 C 
11C  ISGX=l 

XINC=-GSI2E/XEA 
12C  IF(Y8A>        140»125tl3C 

125  YBA«C.l 

13  C  ISGY»-1 

YINC=GSTZE/Yf  A 
GC    "0     15C 
14C  ISGW 

YINC'-GSI  ZE/YeA 
15C         IX=1  +  IFIMXB/GSIZEJ 
I\»1+IFI>{YB  'GSIZE) 

XNE:<T=  GSIZE-  <  FLCA"  (IX)  +0,  5*(  ISGX-1.  )   ) 
YNEXT=GSIZE*  (FLCA1  (lY)+0.5*(  ISGY-1.  )  ) 
XS7EP=  [  XE-XNSX7)  /xeA 
YST£P=(YE-YNEXT)/YBA 
16C         NGFS0=N0?SC+1 
IGX(NGRSC  )•■  * 
ICYINGRSC  )=IY 

IF((XS7Er :.G1  .1  .}  ,;.N0.  (YST  {P.GT.l.  ))     GC    TO    200 
IF<XSTEP-YSTEP J     17C»I8C,1<0 
170  IX= J>    ♦  I  SGX 

X  S  "I  E  ?  =  v,  S  7  E  F  +  X  I  NC 
GO    TC     1<:C 
18C  IX=IX+ISGX 

XS1EP=XS1EP+XINC 
19C  IY=IY  +  ISGY 

YSIEP'Y >TEP+YINC 
GO    TC    IcC 
20C         KGRS=KGRS+NGRSC 
C    GRID    SCuARE     LIST    IVCW    COMPLETE    IN     IGX,     IGY    WITH   NGRSO    ENTRIES 

C***    FINE    WHICH    COVER    ELLIPSES     TOUCH    THE    A    TC    B    LINEi 
O**    CHECK    ELEVATIONS    AI    SI    AND    S2    FCR    EACH    SUCH    ELLIPSE 
NELS=0 
CH7MAX=C. 

IF(NCVEL.c.EO.C)    GC7C    270 
DO    26C    K=l,f>GFSC 
I X=IGX( K  ) 
I Y=IGY(K  ) 
N=NC(IX,  IY  ) 
IF(N.EC.O)    GC    70    26C 
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LS= 

LEN 
CO 


;ic 


22C 


:3C 


LSTCU 

d=ls+n 

25C    L  = 

KELL=K 

IC=LIS 

IF(KCP 

KCR 

RX  = 

RY  = 

PPX 

PFY 

PFX 

AA  = 

BE=FF 

CC  = 

APG 

IF( 


C***    CHECK 


24C  N 

I 

C 

C 

I 

25C  C 

26C         CONTIN 

C***    ALL     ELL 

C***     START    C 

270    CO   eco 

IX= 

IY= 

IF( 

LS  = 

LEN 

DO 


C***    FFOCESS 


OS 

INT 

FK  = 

S=> 

S  =  Y 

ALL 

TS= 

S  =  2 

F(  I 

C 

I 

F(  I 

S 

C 

I 

S  =  X 

S=,i 

ALL 

TS  = 

S  =  2 

Ft  L 

C 

I 

F(L 

S 

C 

I 

ELS 

EL( 

SI  ( 

S2( 

F  <C 

CNT 

LE 

IPS 

Nl    T 

K  = 

IG> 

IG1 

NHL 

LST 

D=l 

5CC 

I  =  L 

IF( 

KHF 

ING 

KH  = 


AT 
=  KI 
CFE 
A  +  S 
A+S 

EL 
HT5 
A+S 
ATO 
ALL 
F(V 
BTO 
=  1. 
ALL 
F(V 
A+S 
A  +  S 

EL 
HTS 
A  +  S 
ATO 
ALL 
F(V 
6  TO 
=  1. 
ALL 
F(V 
=  NE 
NEL 
NEL 
NEL 
PK. 
INU 

ES 

FE 

ltN 

(K) 

(K) 

(IX 

(IX 

S+N 

L= 
1ST 
KHR 
EP( 

FO 
KH+ 


SI     ANC 
NT  +  1 
AK  (IC  ) 

2*X6A 
2*  YBA 
EV  (XS  » 
+  CFK 
2*23A 
B.EC.C 

KCVER 
ISrSE. 
A. EC.C 
-S2 

KOVER 
ISFP.A. 
1=»XBA 
i*Y6A 
E  V  <  X  S  , 
+  CFK 
1*ZEA 
B.EQ.C 

KCVEP 
ISFRR. 
A,  EG.C 
O-Sl 

KCVER 
ISFRA. 
LS  +  1 
S)  =  IC 
S  I  =  S  i 
S)  =  S2 
GT.CH7 


X,IYI 
-1 

LS  ,LENC 
ELL+i 
TC  (L) 
EF(IC)  . 
EP(IC)  = 
XA-CXC( 
>A-CYC( 
>=CPXX( 
V=CPYY ( 
Y=CPXY( 
PPXX+XB 
XX*TWOX 
PPXX+R  X 

=EE*ee- 

APG. LE. 
SC=SGPT 
S1=-(B£ 
S2MSQ- 
IF(S1.G 
IF(S2.L 
IF  (  S  1.  L 
IF  (S2.G 
S2 


EC.K7 
fTREC 
!C) 

:o 
:o 

1C) 

IC) 

£SC  +  P 
EA*Rx 
♦RX+P 

C.  >  G 
(ARG> 
■«S0  »/ 
E3)  /( 
E.l.  ) 
E.G.  ) 
E.O.  ) 
E.l.  } 


PEP)    GC   TO    250 


PYY*Y9ASC+PPXY*XYBA 

+  ?PYY*TWOY  3A*RY+?°XY*(RX*Y8A+RY*X8A ) 

PYY'RY*RY+  FPXY*RX*RY-1.0 

A*CC 

C    TO    2  50 


2.0*AA  ) 

GO    TO     25C 
GO    TO     25C 

GO    TC    510 
GO    TO    51C 


YS.HTS  > 


)     GC    TC 
(ZA.TMA 
LE.O.) 
)     GO    TC 

(ZBtTMA 

LE.O.) 


YS  iHTS) 


210 
C8,SIZE8,ZB  ,32 HTS, 2S , VI SFRe ) 

CO    TC    510 
220 

CA»SIZEA,ZA  f  S,HTS.ZS,  VISFRA) 
GO    TC    510 


I  GO  TO  23C 

(ZA.TMAC3, S  IZEB.ZB  ,S1  HTS , ZS , V  I SFRB ) 

LE.O.)  GC  tq  5io 

)  GC  TO  240 

(Z9, rMACA.SIZEA ,ZA  ,S,HTS,ZS, VISFRA) 
LE.O.)     GO    TG    510 


MAX)    CHTMAX=CPK 


CHECKED 
HILLS 

GRSG 


,IY).EC.C)    GC 

,IY) 

H  L  ( I  X  ,  I  Y  )     -1 

LStLENC 

H(LJ 

EF  < I )  .EC.KTRE 

I  )=KTREP 

R    FILL     I    STAR 

1 


to  eoo 

F)     GO    TO    500 
TS    HEFE 
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C***    COMPUTE    W    =TOP    OF    THIS    HI  L I    ALONG    O-T     LINE 
C 

TR>=XA-XC< I) 

TPY=YA-YC(  I  ) 

TF>X=PXX  (I  ) 

TP^Y=P YY(I I 

TF>Y=PXY  (I  ) 

FQ»TWaXBA*TFXX*TRX+7WCYE£*TPYY*TRY+TPXY*(TRX*Y8A+TR r*XBA) 

GQ=TPXX+X8ASG+TPYY* Y8ASC+TPXY* XY8A 

IF  iCQ    .EO.O. )       GO    TO   500 

W=-FC/  (2. -"GO 

IF<A6SU).GT.5.)    GO    TO     500 

FSC=FQ*FC 

EC»TPXX*1PX*TRX+TPYY*TPY*TRY+TFXY*TRX*TRY 
C 

FGWEF=EG-FS0/(4.*GC ) 

IFiPCWER    .LT.    -3.)     GO    TO    500 

HHW  =  FE/!K  (I  )*EXF(POW  {R  ) 

KHW=KHA+1 

IF(HHW.LE.eASE)    GO    10    5CC 

zw=z*+u*zeA 

IF((W.LT.O. ).0R. (W.GT.l.))    GO    TC    300 

IFlHPW     .C-E.     ZW)     GO'   10    5  1C 

CVHTV«=0. 

IF(NELS.EC.O)    GO    TC    30C 

OC    280    M=1,NELS 

IF(  (CS1 (M).GE.W  )  .OR.  (CS2(M)  .LE.WJ  )    GO    TO    280 
IC=IEL(M) 

IF(  CVHTW.LT.CPEAM  IC  )  )       CVH7W=CPEAK  1 1  C  5 
28C  CCMINLE 

IFUFHW  +  CVHTV.)  .GE.ZH        C-C    TC    5  10 
3CC  I  F<HHW+CHTMAX.LT.Af  INK  ZA-SIZE  A,  Z8-SIZEB)  )     GO    TO    5C0 

C***    IF    WE    GET    TC    HERE    THEN    NEEC    TC    FIND    LOWEST    SIGHT    LINE    OVER    HILL 
C***    NEWTON     ITERATICN    A    TC    6    GIVING    VISFRB 

IF(LATOB.EC.O)    GC    T 0   400 

KV  =  KV+1 

V  =  W 

HHV=HHW 

NCT  =  C 

FV  =  FG*V 

TWCGV=2.*GC*V 
33C  FCNV  =  Za  +  HHV*(TV.OGV*\  +  FV-l.) 

KN=KN+1 

FACTCR=  nW0GV*TW0GV«2.*<GC+TW0GV*FQl+FSQ) 

DFCNV=HHV*V*FACTCR 

IF <*ES< DFCNV  )     .LT.1.E-1C)    GCTC    350 

V=V-FCNV/OFCNV 

FV=FC*V 

TW0GV=2.*GC*V 

POVER    =    EQ+FV+GQ*V*V 

IFCPCWER    .LT.    -3.)     GO    TO    400 

HHV=PEAK  (I  )*EXF(  POW  IR ) 

DHHV=HHV*< FQ+TVOGVJ 

ELV=ZA+CHFV*V 

IF     (ABS(HHV-ELV)     .L1.1.J    GO   TO    350 

N0T  =  NCT+1 

I F     (NCT.LT.10)     GO    TO    33C 
35C  IF  ((V.LT.C.).CR. IV.GT.l. ) I     GO    TC40G 

CVHTV=0. 

IF  (NELS.  ECO  )     GO    TO    390 

DC    360    M=1,NELS 

IF(  (CSKM  ).GE.V  )  .OR.  (CS2(M)  .LE.V)  )G0    TO    360 
IC=IEL(N) 

IF(CVHTV.LT.CPEAKdCJ)    C  VHT  V  =  CPE  AK  ( IC  ) 
38C  CONTINUE 

35C  HTV=HHV+CVHTV 

ZV=ZA+V*Z8A 

CALL    KCVER(Z/,TMAC8,SIZEe,ZB,V  ,HTV,  ZV.VI  SFRB) 

IF     (VI SFP5.LE.C. )     GC    TC    510 
C***    NEWTCN    ITERATE    e    TC    A    GIVING    VISFRA 

IF  <  AES (V  ).CT.5. )GQ     TC    4C0 
ACC  IF(L3TOA.EC.0»     GC    TC    5CC 
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<3C 


45C 


«ec 

4SC 


fCC 
51C 


KV=KV+ 

V  =  k 

VM]=V- 

HHV=hH 

NCT=0 

FV=FQ* 

TWOGV= 

FCNV=Z 

KN=KN+ 

FACTOR 

OFCNV= 

IFtABS 

V=V-PC 

iF<*es 

VM]  =  V- 
FV=FC* 
TWCGV= 
PCWER 
IF  (FCW 
HHV=FE 
DHHV=H 
ELV=Z3 
IF  (A6 
NCT=NC 
IF  (NC 
IF(<V. 
CVFTV= 
IF  (NEL 
CC  480 
IF( 
IC= 
IF( 
CCMIN 
HT\=HH 
ZV  =  Zfl-t- 
S  =  -VM 
CALL  K 
IF  (VI 
CONTINUE 

CONTINUE 

RETURN 

VI<FRA=0. 

V  ISFR6  =  C. 

RETURN 

END 


1. 


2.*GC*V 
B+HHV*UFQ+TW0GVI*VM1-1.  ) 

1 

=(TW0GV*TWCGV*2.+(GQ+TWOGV*FO  )+FSO) 
hHV-*VMl*FACTCP 

(CFCNV)     .LT. 1.5-101    GC    TC    450 
NV/CFCNV 

<V).GT.5.)G0     TO    5CC 
1. 
V 

2.*GC*V 

=    EQ+FV+GQ*V*V 
ER    .LT.    -3. !     CO    TC    500 
AMI  )*EXP<  FQh  (R» 
HVtCFG+TWOGV) 
+  CI-HV*VP1 

S(HHV-ELV)     .LT.l.)    GO    TQ    450 
T+l 

T.LT.1C)    GC    TC    43C 
LT.O.  ).CP.  (V.GT.l.  >)     GO    TO    500 
0. 

S.EC.C)     GO    TC    490 
M=1,NELS 

(C51  (PJ.GE.V  ).0R.(CS2<M)  .LE.V  ))G0    TO    480 
IEL(K) 

CVHTV.LT.CPEAK(IC) )    C  VHT  V  =  CPE  AK.  (  IC  ) 
UE 

V+CVHTV 
V*Z8A 

OVER(ZQ»TMACA ,SI ZEA  ,ZA , S  <HTV  ,ZV, VI SFRA) 
SFFA.LE.O. )     GC    TC     510 
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APPENDIX  C 

COMPLETE  INPUT  DATA  SET 
for  the 
SMALL-UNIT  AMPHIBIOUS  OPERATION  COMBAT  MODEL 

The  small -unit  amphibious  operation  combat  model  consists  of  two 
phases  of  combat,  ship-to-shore  and  land  combat,  and  requires  data 
input  for  each  of  these  phases.  The  data  set  that  follows  is  divided 
into  two  parts:  the  first  part  consists  of  all  data  used  as  input  for 
the  ship-to-shore  phase  of  combat,  and  the  second  part  consists  of  all 
data  used  as  input  for  the  land  combat  phase  of  combat.  The  input  data 
set  was  designed  to  be  self-documenting  in  that  the  input  variable 
names  or  descriptive  phrases  are  listed  alongside  the  data  being  used 
as  input  to  the  model.  The  purpose  of  this  documentation  was  to  assist 
the  user  in  associating  the  input  data  with  their  respective  input 
variables.  A  complete  input  data  set  follows. 
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LVA'S 

TANK 

7SIGV 

TSIGH 

TMENH 

SSIGV 

SSIGH 

CEF. 

SHCP 
A1TRI 


MAX 


IPR 

S^OMA 

TT 

PANG 

TART 


INT 
X    = 

<:    = 

E    = 

M    = 


=    2! 


WEI 
NJ 
E  0 
T  C 
I  C 
A  I 


HILL 


NO. 
CAT 


1. 
25. 

C  • 
25. 

C. 
GhTS 
.    OF 
EF.    T 

C'EF. 

Ufcl-. 

^EC    F 

GAI 

GAMM 

CF    H 

B 

/.:XC  = 


=     1 
40. GO 
10. 

150C 
15. 
500. 

5. 
500. 

c 

sec! 

5. 

25C. 

5. 

2  50. 


ASSIG 
LW    P 
/INK    A 
FCP    A 
FCR    u 
IFE    A 
Nl     = 
A    = 
ILLS 
A<5    = 
2C00 
I8C0 
2CC0 

24co 

2450 

;7co 

220O 
^300 
2750 

i  150 

:2co 

'6C0 

*eco 
;2co 
;aoo 

2100 

2500 
mo 
;;7co 

2EC0 
4  500 
2  6CO 
2  700 
2  000 
2150 
2750 
2£C0 
2  6  CO 
4  150 
]650 
2  2  50 
2200 

;eco 

2  600 
4150 
4450 

4850 
4  5  00 
4850 
4900 
47C0 
4900 
25CO 
5250 
4C00 
2CC0 


NEC 
ER  * 
SSET 
GGPE 
th  EN 
TTRI 

0.3 
50.0 
IN    T 

C.C 
.     YC 


C    FOR    E 

SPOMIN    ■ 

LENGTH 

.     ATGM    MA 

SARTM    = 

1000 

20 

1000 

20 

1C0C 

10 

50  0 

7 

500 

7 

TO    W4VE    C 

AVE    =    25. 

c    = 

SSOP  FCRC 
SivE  FCRC 
T    CCEF.: 

DE 
EPPAIN    MO 


ACH    TIME    ST 

10.5    HTMAX 

OF     EACH    TIM 

X    RANGE     = 

30.       TVEL 

2000. 

25. 

2000. 

25. 

20C0. 

15. 

1000. 

.5  14-. 

1000. 

.5  14.. 

NE    =  2. 

20. 

10. 

E    FIRE:     ALP 

t    FIRE:     BET 

weETA(  1 


EP  £ 
=  1. 
E  ST 
2000 
=    35 


1    FOR    END    OF    BATTLE. 
7    HTM  IN     =    0.6    WIDTH    =    3.533 
EP     IN    SECONCS. 
.    ATGM    MIN    RANGE    =       200. 
0.     SVEL    =    35C. 

10000. 


AND 
ATG 

fa:= 

Ai    * 
)     = 


5000. 

25. 
5000. 

25. 
5GO0. 

15. 
2500. 

15.5 
2500. 

15.5 
WAVE    TWO 
15. 
M    ASSETS 
0.00006 
0.0007 
C.0005 


1C00O. 

10000. 

5000. 

17. 

5000. 

17. 

1. 

10. 

10. 

ALPHA2 

EETA2 

WBETA(2) 


LTA    =    10C.0 
[EL    =       4-6 


LST(5,4>     • 


=    1100.    PEAK=     170. 

2200.  150. 

1S00.  150. 

1400.  150. 

17G0.  130. 

18C0    .  138. 

1650.  140. 

1300.  130. 

1750.  150. 

16C0.  150. 

2150.  130. 

170C.  170. 

1500.  170. 

2600.  170. 

2850.  150. 

27G0.  150. 

24CC.  150. 

2850.  150. 

26C0.  150. 

22CO.  150. 

26C0.  150. 

2EC0.  150. 

23C0.  190. 

33C0.  170. 

375C-  130. 

32C0.  150. 

2SC0.  150. 

26C0.  150. 

3950.  170. 

21C0.  150. 

21C0.  180. 

1700.  180. 

14C0.  150. 

2650.  150. 

3CC0.  130. 

2150.  130. 

3600.  150. 

40C0.  150. 

2450.  150. 

3000.  130. 

24C0.  150. 

20C0.  130. 

11C0.  170. 

43C0.  150. 

2200.  150. 

22C0.  150. 
COCO 


ANGH= 


0.1    SPRD  = 

30. 

130. 

0.1 

80. 

90. 

150. 

160. 

0.1 
160. 
25. 
45. 

0.1 
90. 
120. 
150. 

0.1 
160.0 
130. 
0.1 
90. 
145. 
25. 
15. 

0.1 
10. 
0.1 
160. 
30. 
30. 
150. 
80. 
165. 
20. 
160. 
140. 
45. 
60. 
150. 
45. 
50. 
0.1 
0.1 
45. 
45. 
0.1 
1  7 


999.9 

350. 

2C0. 

30C. 

5C0. 

500. 

6CC. 

400. 

660. 

550. 

500. 

3C0. 

2CG. 

350. 

300. 

350. 

250. 

4C0. 

370. 

230. 

280. 

500. 

350. 

400. 

350. 

850. 

650. 

320. 

220. 

300. 

220. 

150. 

500. 

400. 

300. 

350. 

400. 

450. 

440. 

250. 

400. 

25C. 

S50. 

450. 

280. 

300. 

18 


0. 

0. 

0. 

10000. 
20. 

10000. 
20. 

5. 

O.CCCOS 

0.0009 

0.0C07 


ECC  = 


27 


8.0 

2.0 

2. 

2.5 

2,2 

2.2 

3. 

1       C 

_  •    , 

3.6 
3. 

1.5 

2.5 

2.5 

1.8 

1.8 

2. 

1.0 

3.0 

1.8 

1.5 

1.3 

2.5 

2.0 

2.5 

2.5 

5.C 

3. 

2.0 

2.2 

2.0 

1.2 

1.  5 

2.7 

2.5 

1.7 

2.5 

1.8 

2. 

1.8 

1.5 

2.5 

1.5 

8. 

2.5 

2. 

3.5 
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0 

32 

39 

52 

62 

0 

74 

77 

es 

93 

NHK5,4f     = 

C 

C 

0 

0 

0 

0 

6 

11 

9 

6 

0 

£ 

14 

5 

12 

c 

3 

6 

10 

9 

NO.    OF    HILLS 

7G7AL 

101 

LISIH(I)     = 

X 

2 

1i 

30 

4 

43 

1 

3 

4 

5 

6 

22 

33 

7 

11 

21 

43 

1 

6 

7 

8 

9 

10 

11 

33 

43 

10 

12 

12 

9 

6 

42 

5 

14 

30 

23 

15 

3 

14 

15 

16 

17 

18 

15 

20 

•3 

6 

23 

11 

7 

2 

31 

11 

16 

20 

22 

34 

35 

44 

45 

46 

2C 

21 

11 

12 

34 

35 

36 

40 

41 

42 

45 

46 

14 

22 

15 

23 

24 

25 

15 

26 

14 

25 

26 

27 

28 

29 

24 

22 

22 

35 

44 

26 

27 

29 

35 

36 

37 

38 

39 

40 

NCVELS    = 

0 
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AT7RIT    VAR    =         0            CSEED    =  1*3257.0       iFCR    AGGRESSOR    FORCES) 

BETA    CIST.     INPUT    PARAMETERS:       FP  =                         7.  C      QQ    =                         21.0 

ATTPIT    VAR     =         0            CSEED    =  123457.0       (FOR    DEFENSIVE    FORCES) 

BETA    CIST.     INPUT    PARAMETERS:       FD  =                       21.0      QO    =                            7.0 

NC.     CEF    UNITS    =       03       NO.     ATK    UMTS    =    03 

PMINTK    =    OCCC.O  RMXTK     =    250C.0     RMNTW       =    0500.0  SMXTW    =    4000.0 

TYPE    CF    ROUTE    =     1         VEHICLE     fPEEC    =    4 

XIC(1,1>    =       2C0O.O      YlC(ltl)     =  l^CO.O 

HCO.C  2400.0 

15C0.C  21C0.0 

NC.     CF    NCDE<    FOP    ROUTE    1     =  01 

X10C(1,1>=       fCCO.C       YLQCtltlls  25C0.0              F  CR    NODE    1    CF    FCUTE    1 

NO.    CF    NODES    FOR    ROUTE    2    =  01 

XLCC(2,1)  =       ASCO.O       YL0C(2tl)»  2150.0              FOR   NODE    1    OF    ROUTE     2 

NO.     CF    NODES    FOR     RCUTE    2    =  02 

XLCC(3tl)=       22CO.O       YL0C(3,1)=  17C0.Q              FOR    NODE     1    CP    FCUTE    3 

XLOC<3,2)=       «6C0.C       YL0C(3,2»-  1750.0               FOR    MODE     2    OF    FOUTE     3 

DEF    UNIT    X    =       36CO.C                         Y    =  27CC.O   FCRCE10.0       01R.     1«5C    WIDTH    120 

I                          3800.0  23C0.0    LEVEL    5. J         OF       ISC          OF       120 

LOCATION                  36C0.C  17C0.O                 10.0       FIRE    180       SkCH    120 

ALT.    POS.     VAR.     0            BREAK    PT  CfCG. G    NC.    TIME    S11PZ    FCR    MOVE               4 

XA(1)    =       4500.0               YA(1)      =  36C0.0    FCR    ALT.    POS,     1 

XA(2)    =        45C0.C               YA(2)      -  27CO.O       =                       ="2 

X    =       46C0.Q                         Y    =  16C0.0                                         3 

0.6C                 0.70                 C.65  0.85 

0.65                 C.9C                 C.65  C.90 

0.60                 0.85                 0.85  G.80 

0.75                 C.8C                 C.75  C.70 

0.60                  C.  7C                  C.65  C.65 

0.40                 0.45                 0.40  C.50 
P     C.65       P^H    C.65       FHM    C.75       PKH     C.70 

0.60                  C.80                  0.75  C.70 

C.75                 0.75                 0.70  C.60 

0.60                 C.65                 C.60  C.55 

C.45                 0.50                 0.50  C.35 

C.2C                 C.2C                 C.20  C.20 
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APPENDIX  D 

BLANK  INPUT  DATA  SET 
for  the 
SMALL-UNIT  AMPHIBIOUS  OPERATION  COMBAT  MODEL 

The  blank  data  set  provided  with  the  small -unit  amphibious  opera- 
tion combat  model  was  designed  to  assist  the  more  familiar  user  cf  the 
model  in  the  development  of  a  new  input  data  set  to  be  analyzed  by  the 
model.   It  is  patterned  after  the  complete  input  data  set  listed  in 
Appendix  C  providing  input  variable  names  or  descriptive  phrases  to 
identify  the  locations  of  required  input  parameters.  Underlining  of 
the  spaces  following  these  descriptors  is  intended  to  serve  as  a  guide 
for  inputing  values  for  the  input  variables  in  order  that  they  will  be 
compatible  with  the  formatted  read  statements  of  the  program.  The 
blank  input  data  set  follows. 
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IPRINT   = 
LVA'S         SFCMAX    = 

TTS    =   „ 
TANK    MAX    RANGE    = 

TARTM    =   _ 
TSIGV    =    „ 


TSIGH  =    _Z 

TMENH  =    _Z 

SS  IGV  =    _Z 

SSIGH  =    _" 


0    FOR    EACH    TIME    STEP    £    1    FOR    END    CF    BATTLE, 

SPONIN    = .       I-TMAX    =    _.       HTMIN    =       .        WIDTH    : 

LENGTH     CF    ?ACH    TIME    STE>    IN    SECCNCS. 

ATGM    MA>    RANGE    =       .     ATGM    MIN     FANGE    = 

SAFTM    =   .       TVEL     = .    SVEL    = . 


DEF. 


ASS 


—  _  • 


AGGRES 
DEFENS 
ATTRIT 


WEIGHTS  ASSIGNS 
NC.  OF  LVA  PER 
SHGFE  CEF.  T/fK 
ATTRIT  CCEP.  FOP 
ATTRIT  CCEF.  FOR 
AIMED  F :FE 
GAIM  ■ 
GAMMA  =   _„. 
NO.  CF  HILLS  TK  TE 
BASE  =  C.C 
HILL  0ATA:XC=  20GO.  YC= 
18  CO. 
2CCO. 
24CO. 
2450. 
27CO. 
2  200. 
*3C0. 
2750. 
4  150. 
22CO. 
46C0. 
4800. 
22CO. 
24CO. 
2100. 
25CO. 
2650. 
27C0. 

2eco. 

4500. 
26C0. 
27C0. 
2CC0. 
2150. 
2750. 
26CO. 
2600. 
4150. 
1650. 
2250. 
22CO. 
2600. 
2800. 
^150. 
4450. 
4850. 
45C0. 
4  8  50. 
4  =  C0. 
47CO. 
4900. 
25C0. 
2  2  50. 
4000. 
29CO. 
LST(5,4)  =     0 


0  WAVE  £>? 
VE  «  __. 

SCR  FORCE  F 
IVE  CCRCE  F 
CQEF.: 

DELTA 
PRAIN  MO  CEL 

11C0.  PEAK: 

2200. 

ISCO. 

14C0. 

1700. 

18C0  . 

16f0. 

12C0. 

17  50. 

1600. 

2150. 

17C0. 

1500. 

26CO. 

2850. 

27CG. 

24C0. 

2850. 

26CG. 

22C0. 

26C0. 

28C0. 

23C0. 

2300. 

2750. 

2200. 

38C0. 

36C0. 

2950. 

21CC. 

2100. 

1700. 

14C0. 

2650. 

2CC0. 

3150. 

3600. 

40C0. 

2450. 

20C0. 

24C0. 

2000. 

11C0. 

4200. 

2200. 

22C0. 

0     0 


_  u  JJ  J  .J* 


and  wav"£  Two  = 

~*.   atgm  assets  =        "  . 
ire:    3cpfa1=     .         _       al  phz2  = 

IRE:     Bti'fli    =   _.    _  5ETA2 

WEETA(l)     =      _. WBETA(2)     = 


Tar- 

=    170.    A NGH=       0.1    SPRO= 

150.  30. 

150.  130. 

150.  0.1 

130.  80. 

138.  90. 

140.  150. 

130.  160. 

150.  0.1 

150.  160. 

130.  25. 

170.  45. 

170.  0.1 

170.  90. 

150.  120. 

150.  150. 

150.  0.1 

150.  160.0 

150.  130. 

150.  0.1 

150.  90. 

150.  145. 

190.  25. 

170.  15. 

120.  0.1 

150.  10. 

150.  0.1 

150.  160. 

170.  30. 

150.  30. 

130.  150. 

180.  80. 

150.  165. 

150.  20. 

130.  160. 

130.  140. 

150.  45. 

150.  60. 

150.  150. 

130.  45. 

150.  50. 

130.  0.1 

170.  0.1 

150.  45. 

150.  45. 

150.  0.1 
0           0           0           17 


—  •    .„,,, 


=  99.9       ECC  = 

8.0 

250. 

2.0 

300. 

2. 

300. 

2.5 

5C0. 

2.2 

500. 

2.2 

6C0. 

3* 

400. 

3.5 

660. 

3.6 

550. 

3. 

500. 

1.5 

3C0. 

2.5 

3CC. 

2.5 

350. 

l.a 

300. 

1.3 

250. 

2. 

250. 

1.0 

400. 

3.0 

270. 

1.8 

23C. 

1.5 

260. 

1.3 

500. 

2.5 

35G. 

2.  G 

400. 

2.5 

350. 

2.5 

850. 

5.0 

650. 

3. 

32C. 

2.0 

220. 

2.2 

300. 

2.0 

220. 

1.2 

150. 

1.5 

5CC. 

2.7 

4C0. 

2.5 

300. 

1.7 

350. 

2.5 

400. 

1.8 

450. 

2. 

440. 

1.8 

250. 

1.5 

400. 

2.5 

250. 

1.5 

950. 

8. 

450. 

2.5 

280. 

2. 

300. 

3.5 

18         27 
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0 

32 

39 

53 

62 

0 

74 

77 

83 

93 

NHK5.41    = 

C 

C 

0 

0 

0 

0 

6 

11 

9 

6 

C 

6 

14 

9 

12 

0 

3 

6 

10 

9 

^Q.    CF    HILLS 

TC7AL    - 

101 

LIMH(I>     = 

1 

2 

•a 

30 

4 

43 

1 

3 

4 

5 

6 

22 

23 

7 

11 

21 

43 

1 

6 

7 

8 

9 

10 

11 

33 

43 

10 

12 

13 

9 

e 

42 

2 

14 

30 

23 

15 

3 

14 

15 

16 

17 

18 

IS 

20 

■3 

6 

23 

11 

7 

2 

21 

11 

16 

20 

22 

34 

35 

44 

45 

46 

2C 

21 

22 

12 

34 

35 

36 

40 

41 

42 

45 

46 

14 

23 

15 

23 

24 

25 

15 

26 

14 

25 

26 

27 

28 

29 

24 

22 

22 

35 

44 

26 

27 

29 

35 

36 

37 

38 

39 

40 

NCELS    = 

0 
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ATTRIT    VAR    = 
BETA    Cist.     INPUT 
ATTFIT    VAP     = 


P*P 


nSEED 

METERS  : 

:seed 


FP     = 


BETA    CIST.     INFlT    PARAMETERS:       FO    =" 
NC.     CEF    UNITS    -      NC.     ATK.    JMTS    = 

PMINTK     = .  PNX7K     = .        FCIR" 

TYPE    CF    RGUTE    =    _         VEHICL?     JPfED    =_. 

XI  C(  1,1  J  = ._   VIC  (1»  1)  = .. 


(FCR  AGGRE3SCP  FORCES) 

QQ  = 
TF^R  DEFENSIVE  fop.c"=sT 
._   OD  =  _._ 

=  .   _._    RMXTH  =  .     , 


NC.     CF    NGDEl    FO"    FGLTE 
XLCCll,l)=       ,_,.._       > I C  C  T 1 

NC.     CF    NODE?    T3.R    ROUTE    , 
XL0C<2,1)=       ,_„._       YLCC12 

NG.     CF    NODE?    FT5R     ROLTC 


XLCC(2 »1)= 

XLGC (  I  ,2)  = 

CEF    UNIT    X    = 

I 
LCCATICN 

ALT.    POS, 
X*  (1)     = 
XA(2)    = 
X    = 


VAR.    _ 


TCCff.3 


UCC73 
rlCC(3 


EREA 
YA( 
YA( 


I1  '  = 
tl  )  -- 

tl  )  = 

t2)  = 

Y     = 


K    PT 

1)  = 

2)  = 

Y     = 


■    ■  —  —  •  - 

,       HI,,     „■      . 

m  M  _  m  •  . 


FCR    NODE    1    GF    ROUTE    1 

FCR   NODE    1    OF    ROUTE     2 

FCR    NODE     1    OF    PCUTE     3 
FCR    NODE    2    CF    f-CUT  E    3 

FCRCE ._      DIFt.       _      WIDTH 

LEVEL ._         Cc OF 

,_._       FIRE   „_      S^CH 
NC.    Tll-E    STEPS    Ftt    MOVE 
FCR    ALT.    PQS.    1 
2 
3 


I*I_        PHh 


frtJ 


_        PKH    I 
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APPENDIX  £ 

EXECUTIVE  PROGRAM 

for  the 

SMALL-UNIT  AMPHIBIOUS  OPERATION  COMBA"  MODEL 

The  combat  model  presented  in  this  thesis  has  been  provided  with  an 
EXEC  program  which  is  designed  to  set  up  and  execute  all  of  the  necessary 
CMS  commands  for  the  running  of  the  model.  The  EXEC  program  will  auto- 
matically BROWSE  the  output  listing  of  the  model  [AMPHIB1  LISTING) 
allowing  the  user  to  review  immediately  the  results  of  the  battle. 
A  listing  of  the  EXEC  follows. 

GLOBAL  TXTLIB  F0RTM0D2  M0D2EEH  IMSLSP  NONIMSL  CMSLIB 

FILEDEF  05  DISK  SEA  DATA 

FILEDEF  09  DISK  LAND  DATA 

FILEDEF  06  DISK  AMPHIB1  LISTING 

LOAD  AMPHIB  (START) 

BROWSE  AMPHIB  1  LISTING 
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APPENDIX  F 

COMPUTER  OUTPUT 

for  the 

SMALL-UNIT  AMPHIBIOUS  OPERATION  COMBAT  MODEL 

The  computer  output  for  the  small -unit  amphibious  operation  combat 
model  was  designed  to  be  clear,  concise,  and  identifiable  to  the  user 
of  the  program.  The  combat  model  conducts  two  phases  of  combat:  ship- 
to-shore  and  land  combat.  Therefore,  the  computer  output  was  designee 
to  report  on  each  phase  of  combat.  The  computer  output  for  each  phase 
of  combat  begins  with  an  initial  information  page  which  lists  the 
input  data  provided  by  the  user  of  the  model.  The  initial  informatior 
page  serves  as  a  record  of  the  battle  scenario  analyzed  by  the  :T.cdel , 
as  well  as  a  check  for  the  user  to  insure  that  the  input  data  provided 
were  read  correctly  by  the  model.  In  addition,  a  battle  summary 
report  is  provided  reporting  on  the  status  of  both  the  aggressor  and 
defender  forces  throughout  both  phases  of  combat.  The  computer  output 
based  upon  the  input  data  listed  in  Appendix  C  is  as  follows. 
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**    INITIAL    SHIF-TO-SHOFE     FHASE    INFORMATION    ** 

INITIAL    FCFCE    STRENGTH 
VAVE       1  2  3  A  5 

LVA       25.0      20.0      15.0       10.0         5.0 

CEP.    TANK    ASSETS    =    ICO  DEF  .    ATGM    ASSETS    =    10.0 

LVA     ENGR    SPECS 
SFDMAX       SPDMIN         HTMAX       HTMIN         WIC 
AC. 00  10.  5C  1.7C         C.6C       3.52 

DEFENSIVE    TACTICAL    PARAMETERS 

RANGE  AIM-RELCAD  PROJECTILE 

MAX         MIN  TIME  VELOCITY 

TANK    15G0.0  15. CO  i^U  .00 

ATGM    2CCC.0       2CC.0       2C.CC  25C.C0 

DEFENSIVE    TACTICAL    ALLCCATICN    WEIGHTS: 
hAVE    1    =       2.0C    V«AVE     I    =        l.OC 

CEFENSIVE    FORCE  ATTRITION    COEFFICIENTS 

ALPHA  •'♦A  BETA*  A 

DT  0.0000*  C. 00070 

OS  O.OOCGE  O.C0090 

AIMEC     FIFE    ATTRITION    RATE     COEFFICIENTS    FOR 
CEFENSIVE    TANK    AND    ATGM    ASSETS 

WEETAd  )  =  0.00  0  50    WBETA < 2  )  =  C. COO  70 

BREAKPOINT    ASSUMPTION:    0.3*<TCTAL    DEF    FCRCE) 

DEFENDEF    ATTRITION    LEVEL    ALLOWING    ^CR    LAND    CCMBAT 
0.22*(TCTAL    DEFENDER    FORCEl 

ARTM    SUP    FACTOR=   50.0       ERROR    SUP    FACTOR=10C0 

DISPERSION   DATA 


RANGE 

TSIGV 

RANGE 

TSIGH 

R/NGE 

TMEANH 

25.0 

O.C 

25. C 

CO 

25.  0 

0.  0 

500.  C 

2.C 

5CC.C 

2.0 

500. a 

1.0 

1C0C.C 

5.  C 

lOCG.C 

5.0 

1 coo.c 

5.0 

2CC0.0 

20.  C 

20CC.C 

20.0 

2C0C  0 

10.0 

5COO.0 

25. C 

5000.0 

25.0 

5C00.C 

15.0 

10CCC.C 

25.  C 

1C0CC.C 

25.0 

10C00.C 

15.0 

RANGE 

SSIGV 

RANGE 

SS1GH 

25. C 

0.  0 

25. C 

CO 

250. C 

5.0 

25C.0 

5.0 

500.0 

7.5 

500. C 

7.5 

1CCC.C 

14.  C 

lOCG.C 

14.0 

2500. C 

15.5 

2500  .C 

15.5 

5C0C.C 

17.  C 

5000.0 

17.0 

10COC.C 

20.  C 

100CC.C 

2C.0 

CURRENT     STATUS    OF  feAVE    I    VARIABLE    DEFINITIONS 

C    -    NOT    ENGAGING 

1  -  LANCED 

2  -    UNCEF  FIRE  BV  ATGM 
2  -  UNCEP  FIRE  EY  TANK 

A    -  UNCER  FIRE  £Y  BOTH  ATGM  g  TANK 
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4****    THE    SHIP-TO-SHORE    PHASE    BEGINS    ***** 


BREAKPOINT    REACHEO    AT    TIME    =       502.5    SECONO S 


TIME=    5C2.5    SECONDS 


WVE 

FCFCE    LEVEL 

STATUS 

LOST-PCT      T 

1 

16.0CCC 

0.360 

2 

13.0C0C 

0.35C 

•a 

11.0000 

0.267 

4 

10.0000 

0  .0 

c 

5.0CQO 

0.0 

TANK 

0.0 

1  .000 

ATGM 

CO 

1  .000 

FINAL 

LVA    SURVIVOR 

S    ASHORE 

55.CCC 

TOTAL     SURVIVING 


55.00 


0.0 
LANC    COMBAT    STARTS    WHILE    SHCRE     COMBAT    IS    GOING    ON 
LANC    COMBAT    ATTACK    TIME    =    495.  C    SECCNDS 
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**     INITIAL    LAND   CCM6AT     INFORMATION    <* 


LOCATION 

UN  IT 

X 

Y 

FCRCE 

!     LEVEL 

1 

2000.0 

190C.0 

18.0 

2 

1900.0 

2400.0 

18.0 

a 

15CC.0 

21C0.0 

16.0 

4 

2600.0 

2700.0 

10.0 

E 

36CO.C 

2300. C 

5.0 

£ 

r600.0 

17CC.0 

10.0 

ATTRITION    IS    STOCHASTIC 

ROUTES    DETERMINED    6Y    USER 

ATTACK    VEHICLE    SPEED    IS    16.0    M.  P.H. 

£REAKPOINT    DISTANCE     IS       500.0    *ETEFS 

DEFENCEP    WILL     MOVE    TO    ALTERNATE    POSITIONS 
ALTERNATE    P0SI1ICNS    ARE: 
UN  IT  X  Y 

4  4500. C  38  00.0 

5  45C0.C  2700.0 

6  4*CO,0  180C.C 

ATK  KILL  PPOBABILITIES 

PAfvC-S  P  PHH  FHM  PKH 

50.0  C.60  0.70  0.6  5  0.S5 

10<3C  0.65  C.SO  0.85  C.90 

15CC  0.80  0.65  C.85  C.8C 

2C0O  0.75  C.8G  0.75  C.70 

25CC  0.6C  O.TC  C.6E  0.65 

3C00  0.40  0.45  C.40  C.5C 

DEF.     KILL  FFCE4ei LITIES 

RA^E  P  FHH  PHf  PKH 

SCO  C.85  0.85  0.75  0.70 

10CC  0.60  0.8C  C.75  G.7C 

150C  C.75  C.75  C.7C  C.6C 

200C  O.fcO  C.65  0.60  0.55 

250C  0.45  0.5C  0.5C  C.35 

3CGG  0.20  C.2C  0  .2C  0.20 

CURRENT    STATUS    OF    UNIT    I    VARIABLE    DEFINITIONS 

0  -  ALI VE    NOT    FIPI \C 

1  -  AL;  VE    AND     FIRING 

2  -  K :  1 1  L  E  D 

3  -  PGMfsG 

VEHICLE     SPEED     VARIABLE    DEFINITIONS 

1-5  MFH 

2-12  NFH 

3-15  MFH 

4-18  MFH 
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*****    THE    LAND    COMtAT    PHASE    BEGINS    ***** 
****    DEFENSIVE   FORCE    IS    ELtMICATEC.    END    OF    BATTLE. 
TIME  =    745    SECONDS 


AGGRESOP    UNIT     INFORMATION 


UNIT  X 

1  2294.5 

2  27^4. 2 
2  322^*7 


Y 

1978.9 
2246.3 
1721.6 


FORCE    LEVEL 
G  .0 
4.8 
17.  0 


CEFENSIVE    UNIT    INFORMATION 


UNIT  X  Y 

4  4  5  00.0  3300.0 

5  45CO.C  27CC.C 

6  4cC0.0  1800.0 


FORCE    LEVEL 
0  .0 

CO 
0  ,0 


STATUS 
2 
1 
0 


STATUS 
2 
2 
2 


LOST-PCT 
1.000 
0.731 
0.005 


LOST-PCT 
1.000 
1.000 
1.000 


TARGETS 


TARGETS 
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